[PATCH 2/2] For better visibility, add subword-mode to options menu

[Daniel Colascione]

---
 lisp/menu-bar.el |    8 ++++++++
 1 files changed, 8 insertions(+), 0 deletions(-)

diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index 9c020ff..e0bd1b9 100644
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -34,6 +34,8 @@
 ;; From emulation/cua-base.el; used below
 (defvar cua-enable-cua-keys)
 
+;; From progmodes/subword.el; used below
+(defvar global-subword-mode)
 
 ;; Don't clobber an existing menu-bar keymap, to preserve any menu-bar key
 ;; definitions made in loaddefs.el.
@@ -1295,6 +1297,12 @@ mail status in mode line"))
        (:visible (and (boundp 'cua-enable-cua-keys)
                      (not cua-enable-cua-keys)))))
 
+    (define-key menu [subword-mode]
+      (menu-bar-make-mm-toggle
+       global-subword-mode
+       "Treat WordsWithCaps as separate words"
+       "Treat each capitalized part of a word as a separate word"))
+
     (define-key menu [case-fold-search]
       (menu-bar-make-toggle
        toggle-case-fold-search case-fold-search
-- 
1.7.5.1