[elpa] 175/287: Change the `describe-mode` to `ergoemacs-describe-major-mode`. That way R will display the correct key to view information (C-h m)

[Matthew Fidler]

mlf176f2 pushed a commit to branch externals/ergoemacs-mode
in repository elpa.

commit 342d67dced90ed5e9ec86ca3af38bab5d295a7c9
Author: Matthew L. Fidler <address@hidden>
Date:   Thu Jun 19 10:59:33 2014 -0500

    Change the `describe-mode` to `ergoemacs-describe-major-mode`. That
    way R will display the correct key to view information (C-h m)
---
 ergoemacs-themes.el |    6 ++----
 1 files changed, 2 insertions(+), 4 deletions(-)

diff --git a/ergoemacs-themes.el b/ergoemacs-themes.el
index 424a401..afb08de 100644
--- a/ergoemacs-themes.el
+++ b/ergoemacs-themes.el
@@ -373,7 +373,6 @@
   (global-set-key (kbd "C-h 8") 'ergoemacs-lookup-wikipedia)
   (global-set-key (kbd "C-h 9") 'ergoemacs-lookup-word-definition)
   (global-set-key (kbd "C-h `") 'elisp-index-search)
-  (global-set-key (kbd "C-h m") 'ergoemacs-describe-major-mode)
   (global-set-key (kbd "C-h o") 'ergoemacs-where-is-old-binding)
   (global-set-key (kbd "C-h z") 'ergoemacs-clean)
   (global-set-key (kbd "<f1> '") 'ergoemacs-display-current-svg)
@@ -386,7 +385,6 @@
   (global-set-key (kbd "<f1> 8") 'ergoemacs-lookup-wikipedia)
   (global-set-key (kbd "<f1> 9") 'ergoemacs-lookup-word-definition)
   (global-set-key (kbd "<f1> `") 'elisp-index-search)
-  (global-set-key (kbd "<f1> m") 'ergoemacs-describe-major-mode)
   (global-set-key (kbd "<f1> o") 'ergoemacs-where-is-old-binding))
 
 
@@ -691,7 +689,6 @@
   (global-set-key (kbd "<apps> h 8") 'ergoemacs-lookup-wikipedia)
   (global-set-key (kbd "<apps> h 9") 'ergoemacs-lookup-word-definition)
   (global-set-key (kbd "<apps> h `") 'elisp-index-search)
-  (global-set-key (kbd "<apps> h m") 'ergoemacs-describe-major-mode)
   (global-set-key (kbd "<apps> h o") 'ergoemacs-where-is-old-binding)
   (global-set-key (kbd "<apps> h z") 'ergoemacs-clean)
   (global-set-key (kbd "<apps> h Z") 'ergoemacs-clean-nw)
@@ -880,7 +877,8 @@
 (ergoemacs-theme-component ergoemacs-remaps ()
   "Remaps for ergoemacs-mode"
   (when ergoemacs-mode
-    (global-set-key [remap describe-key] 'ergoemacs-describe-key)))
+    (global-set-key [remap describe-key] 'ergoemacs-describe-key)
+    (global-set-key [remap describe-mode] 'ergoemacs-describe-major-mode)))
 
 (ergoemacs-theme-component ergoemacs-banish-shift ()
   "Banish Shift Combinations with <apps> SPC"