[nongnu] elpa/caml afa97cc2f2 1/2: fix(caml.el): to comply with Emacs' manual D.2 Key Binding Conventions

[ELPA Syncer]

branch: elpa/caml
commit afa97cc2f219ab3dbe7f0e01d5f052e328a415d2
Author: Erik Martin-Dorel <erik@martin-dorel.org>
Commit: Erik Martin-Dorel <erik@martin-dorel.org>

    fix(caml.el): to comply with Emacs' manual D.2 Key Binding Conventions
    
    
(https://www.gnu.org/software/emacs/manual/html_node/elisp/Key-Binding-Conventions.html)
    
    Unbind <kbd>C-c C-h</kbd> and bind <kbd>C-h .</kbd> instead.
    
    Related: https://github.com/ocaml/merlin/issues/1386#issuecomment-1701567716
---
 caml-help.el | 10 +++++-----
 caml.el      |  2 +-
 2 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/caml-help.el b/caml-help.el
index 8adc2e5b57..4a7a327d3b 100644
--- a/caml-help.el
+++ b/caml-help.el
@@ -839,11 +839,11 @@ buffer positions."
 ;  (boundp 'caml-mode-map)
 ;  (keymapp caml-mode-map)
 ;  (progn
-;    (define-key caml-mode-map [?\C-c?i] 'ocaml-add-path)
-;    (define-key caml-mode-map [?\C-c?]] 'ocaml-close-module)
-;    (define-key caml-mode-map [?\C-c?[] 'ocaml-open-module)
-;    (define-key caml-mode-map [?\C-c?\C-h] 'caml-help)
-;    (define-key caml-mode-map [?\C-c?\t] 'caml-complete)
+;    (define-key caml-mode-map [?\C-c?i] #'ocaml-add-path)
+;    (define-key caml-mode-map [?\C-c?]] #'ocaml-close-module)
+;    (define-key caml-mode-map [?\C-c?[] #'ocaml-open-module)
+;    (define-key caml-mode-map [?\C-h?.] #'caml-help)
+;    (define-key caml-mode-map [?\C-c?\t] #'caml-complete)
 ;    (let ((map (lookup-key caml-mode-map [menu-bar caml])))
 ;      (and
 ;       (keymapp map)
diff --git a/caml.el b/caml.el
index 641e9b2dae..0dfa2fdd2b 100644
--- a/caml.el
+++ b/caml.el
@@ -315,7 +315,7 @@ have `caml-electric-indent' on, which see.")
     (define-key map [?\C-c?i] #'ocaml-add-path)
     (define-key map [?\C-c?\]] #'ocaml-close-module)
     (define-key map [?\C-c?\[] #'ocaml-open-module)
-    (define-key map [?\C-c?\C-h] #'caml-help)
+    (define-key map [?\C-h?.] #'caml-help)
     (define-key map [?\C-c?\t] #'caml-complete)
     ;; others
     (define-key map "\C-cb" #'caml-insert-begin-form)