From: John Anthony Date: Fri, 25 Oct 2013 02:35:55 +0000 (-0700) Subject: * lisp/progmodes/inf-lisp.el (inferior-lisp-menu): Add menu. X-Git-Tag: emacs-24.3.90~173^2^2~42^2~45^2~387^2~1138 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a0be396a4a31ed67e3953cdac830945bbeb494a9;p=emacs.git * lisp/progmodes/inf-lisp.el (inferior-lisp-menu): Add menu. Fixes: debbugs:15599 --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 161e7be2ae0..0bd907ce581 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2013-10-25 John Anthony + + * progmodes/inf-lisp.el (inferior-lisp-menu): Add menu. (Bug#15599) + 2013-10-25 Glenn Morris * vc/vc.el (vc-print-log): Don't use a working revision unless @@ -617,7 +621,7 @@ * textmodes/text-mode.el (text-mode-map): Use auto-fill help text from menu-bar.el. -2013-10-10 John Anthony (tiny change) +2013-10-10 John Anthony * textmodes/text-mode.el (text-mode-map): Add a menu. (Bug#15562) diff --git a/lisp/progmodes/inf-lisp.el b/lisp/progmodes/inf-lisp.el index d73e9489d7c..a9953e271dc 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