(set-visited-file-name): Change the auto save file name.

[gnu-emacs] / lisp / novice.el

diff --git a/lisp/novice.el b/lisp/novice.el
index caddf120743d54e8dca28523aa110d94a58848df..95576d72b0766bcf2a1050a37b81a697632511f2 100644 (file)
--- a/lisp/novice.el
+++ b/lisp/novice.el
@@ -1,11 +1,15 @@
-;; Handling of disabled commands ("novice mode") for Emacs.
+;;; novice.el --- handling of disabled commands ("novice mode") for Emacs.
+
 ;; Copyright (C) 1985, 1986, 1987 Free Software Foundation, Inc.
 
+;; Maintainer: FSF
+;; Keywords: internal, help
+
 ;; This file is part of GNU Emacs.
 
 ;; GNU Emacs is free software; you can redistribute it and/or modify
 ;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation; either version 1, or (at your option)
+;; the Free Software Foundation; either version 2, or (at your option)
 ;; any later version.
 
 ;; GNU Emacs is distributed in the hope that it will be useful,
@@ -17,13 +21,16 @@
 ;; along with GNU Emacs; see the file COPYING.  If not, write to
 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
+;; Code:
 
 ;; This function is called (by autoloading)
 ;; to handle any disabled command.
 ;; The command is found in this-command
 ;; and the keys are returned by (this-command-keys).
 
-;;;###autoload (setq disabled-command-hook 'disabled-command-hook)
+;;;###autoload
+(setq disabled-command-hook 'disabled-command-hook)
+
 ;;;###autoload
 (defun disabled-command-hook (&rest ignore)
   (let (char)
@@ -107,3 +114,4 @@ to future sessions."
    (insert "(put '" (symbol-name command) " 'disabled t)\n")
    (save-buffer)))
 
+;;; novice.el ends here