procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* emacs-lisp/lisp-mode.el (emacs-lisp-mode-map): Bugfix: replaced

Browse source 
:enable (mark-active) with :enable mark-active.  Thanks to Lennart
Borgman.
This commit is contained in:
Bastien Guerry 2008-03-06 17:15:47 +00:00
parent 403d0c9679
commit a218ab178b
2 changed files with 8 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2008-03-06 Lennart Borgman <lennart.borgman@gmail.com> (tiny change)
* emacs-lisp/lisp-mode.el (emacs-lisp-mode-map): Bugfix: replaced
:enable (mark-active) with :enable mark-active.
2008-03-06 Juanma Barranquero <lekktu@gmail.com> 2008-03-06 Juanma Barranquero <lekktu@gmail.com>
* vms-patch.el (make-legal-file-name): New obsolete alias. * vms-patch.el (make-legal-file-name): New obsolete alias.

6
lisp/emacs-lisp/lisp-mode.el
View file

@ -298,7 +298,7 @@
(define-key menu-map [eval-region] (define-key menu-map [eval-region]
'(menu-item "Evaluate Region" eval-region '(menu-item "Evaluate Region" eval-region
:help "Execute the region as Lisp code" :help "Execute the region as Lisp code"
:enable (mark-active))) :enable mark-active))
(define-key menu-map [eval-sexp] (define-key menu-map [eval-sexp]
'(menu-item "Evaluate Last S-expression" eval-last-sexp '(menu-item "Evaluate Last S-expression" eval-last-sexp
:help "Evaluate sexp before point; print value in minibuffer")) :help "Evaluate sexp before point; print value in minibuffer"))
@ -306,11 +306,11 @@
(define-key menu-map [comment-region] (define-key menu-map [comment-region]
'(menu-item "Comment Out Region" comment-region '(menu-item "Comment Out Region" comment-region
:help "Comment or uncomment each line in the region" :help "Comment or uncomment each line in the region"
:enable (mark-active))) :enable mark-active))
(define-key menu-map [indent-region] (define-key menu-map [indent-region]
'(menu-item "Indent Region" indent-region '(menu-item "Indent Region" indent-region
:help "Indent each nonblank line in the region" :help "Indent each nonblank line in the region"
:enable (mark-active))) :enable mark-active))
(define-key menu-map [indent-line] '("Indent Line" . lisp-indent-line)) (define-key menu-map [indent-line] '("Indent Line" . lisp-indent-line))
map) map)
"Keymap for Emacs Lisp mode. "Keymap for Emacs Lisp mode.