Subject: Re: bug#15599: [PATCH] Inferior Lisp Mode Menu

From: John Anthony <[email-masked]>
Date: Thu, 24 Oct 2013 15:05:18 +0100

Glenn Morris wrote:
> > To use a working example, should I disable "Eval Last Sexp" in the
> > menu if the cursor is not positioned after a valid sexp?
> 
> But that seems like too much. I'd leave such an item always enabled.

I'll be honest - I was always expecting the answer to be "it depends
on the context". Here's a patch with your style advice applied:

diff --git a/lisp/progmodes/inf-lisp.el b/lisp/progmodes/inf-lisp.el
index d73e948..a9953e2 100644
--- a/lisp/progmodes/inf-lisp.el
+++ b/lisp/progmodes/inf-lisp.el
@@ -91,6 +91,21 @@ mode.  Default is whitespace followed by 0 or 1 single-letter colon-keyword
     (define-key map "\C-c\C-v" 'lisp-show-variable-documentation)
     map))
 
+(easy-menu-define
+  inferior-lisp-menu
+  inferior-lisp-mode-map
+  "Inferior Lisp Menu"
+  '("Inf-Lisp"
+    ["Eval Last Sexp" lisp-eval-last-sexp t]
+    "--"
+    ["Load File..." lisp-load-file t]
+    ["Compile File..." lisp-compile-file t]
+    "--"
+    ["Show Arglist..." lisp-show-arglist t]
+    ["Describe Symbol..." lisp-describe-sym t]
+    ["Show Documentation for Function..." lisp-show-function-documentation t]
+    ["Show Documentation for Variable..." lisp-show-variable-documentation t]))
+
 ;;; These commands augment Lisp mode, so you can process Lisp code in
 ;;; the source files.
 (define-key lisp-mode-map "\M-\C-x"  'lisp-eval-defun)     ; Gnu convention

-- 
John Anthony
http://jo.hnanthony.com