]> code.delx.au - gnu-emacs/blobdiff - lisp/novice.el
(help-menu-bar-map): Put the Help item in this map.
[gnu-emacs] / lisp / novice.el
index 28ba34d206f0d63b30a55ad44933b775a503980c..b874754920959f6d198d31cfe1e17efed809da13 100644 (file)
@@ -99,7 +99,6 @@ to future sessions."
      ;; Must have been disabled by default.
      (goto-char (point-max))
      (insert "\n(put '" (symbol-name command) " 'disabled nil)\n"))
-   (setq foo (buffer-modified-p))
    (save-buffer)))
 
 ;;;###autoload
@@ -120,13 +119,4 @@ to future sessions."
    (insert "(put '" (symbol-name command) " 'disabled t)\n")
    (save-buffer)))
 
-;;;###autoload
-(defun enable-and-notify (&rest args)
-  "A novice hook for non-novices."
-  (put this-command 'disabled nil)
-  (message "You typed %s.  %s was disabled.  It's enabled now."
-          (key-description (this-command-keys)) this-command)
-  (sit-for 0)
-  (call-interactively this-command))
-
 ;;; novice.el ends here