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

* lisp/novice.el (disabled-command-function): Fix 2009-11-15 change. (Bug#7384)

Browse source
This commit is contained in:
Glenn Morris 2010-11-13 01:16:18 -08:00
parent 5b05d75ba7
commit f0a698ab85
2 changed files with 10 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2010-11-13 Glenn Morris <rgm@gnu.org>
* novice.el (disabled-command-function):
Fix 2009-11-15 change. (Bug#7384)
2010-11-12 Glenn Morris <rgm@gnu.org>
* calendar/calendar.el (diary-iso-date-forms): Make elements

11
lisp/novice.el
View file

@ -1,7 +1,7 @@
;;; novice.el --- handling of disabled commands ("novice mode") for Emacs
;; Copyright (C) 1985, 1986, 1987, 1994, 2001, 2002, 2003, 2004,
;; 2005, 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc.
;; Copyright (C) 1985, 1986, 1987, 1994, 2001, 2002, 2003, 2004, 2005,
;; 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc.
;; Maintainer: FSF
;; Keywords: internal, help
@ -110,9 +110,9 @@ SPC to try the command just this once, but leave it disabled.
(not (string= "" user-init-file))
(y-or-n-p "Enable command for future editing sessions also? "))
(enable-command cmd)
(put cmd 'disabled nil)))
(?n nil)
(t (call-interactively cmd)))))
(put cmd 'disabled nil))))
(or (char-equal char ?n)
(call-interactively cmd))))
(defun en/disable-command (command disable)
(unless (commandp command)
@ -169,5 +169,4 @@ to future sessions."
(provide 'novice)
;; arch-tag: f83c0f96-497e-4db6-a430-8703716c6dd9
;;; novice.el ends here