[Emacs-diffs] trunk r114794: * lisp/progmodes/ruby-mode.el (ruby-mode-menu): Add a menu

[Glenn Morris]

------------------------------------------------------------
revno: 114794
revision-id: address@hidden
parent: address@hidden
fixes bug: http://debbugs.gnu.org/15600
author: John Anthony <address@hidden>
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Thu 2013-10-24 19:38:39 -0700
message:
  * lisp/progmodes/ruby-mode.el (ruby-mode-menu): Add a menu
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/progmodes/ruby-mode.el    
rubymode.el-20091113204419-o5vbwnq5f7feedwu-8804

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-10-25 02:35:55 +0000
+++ b/lisp/ChangeLog    2013-10-25 02:38:39 +0000
@@ -1,6 +1,8 @@
 2013-10-25  John Anthony  <address@hidden>
 
-       * progmodes/inf-lisp.el (inferior-lisp-menu): Add menu.  (Bug#15599)
+       * progmodes/ruby-mode.el (ruby-mode-menu): Add a menu.  (Bug#15600)
+
+       * progmodes/inf-lisp.el (inferior-lisp-menu): Add a menu.  (Bug#15599)
 
 2013-10-25  Glenn Morris  <address@hidden>
 

=== modified file 'lisp/progmodes/ruby-mode.el'
--- a/lisp/progmodes/ruby-mode.el       2013-10-24 00:47:28 +0000
+++ b/lisp/progmodes/ruby-mode.el       2013-10-25 02:38:39 +0000
@@ -160,6 +160,22 @@
     map)
   "Keymap used in Ruby mode.")
 
+(easy-menu-define
+  ruby-mode-menu
+  ruby-mode-map
+  "Ruby Mode Menu"
+  '("Ruby"
+    ["Beginning Of Block" ruby-beginning-of-block t]
+    ["End Of Block" ruby-end-of-block t]
+    ["Toggle Block" ruby-toggle-block t]
+    "--"
+    ["Backward Sexp" ruby-backward-sexp
+     :active (not ruby-use-smie)]
+    ["Forward Sexp" ruby-forward-sexp
+     :active (not ruby-use-smie)]
+    ["Indent Sexp" ruby-indent-sexp
+     :active (not ruby-use-smie)]))
+
 (defvar ruby-mode-syntax-table
   (let ((table (make-syntax-table)))
     (modify-syntax-entry ?\' "\"" table)