aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1998-03-28 07:32:50 +0000
committerRichard M. Stallman1998-03-28 07:32:50 +0000
commit478653c95d0c5a9e07dae3f64258d21ea74ca98b (patch)
tree4a584dd7234b3c07add86b9ed44fe6717802d4b8
parent89f1709fdea722f418d6002ff564ce09c65e57cc (diff)
downloademacs-478653c95d0c5a9e07dae3f64258d21ea74ca98b.tar.gz
emacs-478653c95d0c5a9e07dae3f64258d21ea74ca98b.zip
(desktop-load-default): Add autoload cookie.
(desktop-read): Likewise.
-rw-r--r--lisp/desktop.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/desktop.el b/lisp/desktop.el
index b31f17353da..61502a6a828 100644
--- a/lisp/desktop.el
+++ b/lisp/desktop.el
@@ -35,10 +35,9 @@
35;; - buffer-read-only 35;; - buffer-read-only
36;; - some local variables 36;; - some local variables
37 37
38;; To use this, first put these three lines in the bottom of your .emacs 38;; To use this, first put these two lines in the bottom of your .emacs
39;; file (the later the better): 39;; file (the later the better):
40;; 40;;
41;; (load "desktop")
42;; (desktop-load-default) 41;; (desktop-load-default)
43;; (desktop-read) 42;; (desktop-read)
44;; 43;;
@@ -503,6 +502,7 @@ MODE is the major mode."
503 (if (file-exists-p filename) 502 (if (file-exists-p filename)
504 (delete-file filename))))) 503 (delete-file filename)))))
505;; ---------------------------------------------------------------------------- 504;; ----------------------------------------------------------------------------
505;;;###autoload
506(defun desktop-read () 506(defun desktop-read ()
507 "Read the Desktop file and the files it specifies. 507 "Read the Desktop file and the files it specifies.
508This is a no-op when Emacs is running in batch mode." 508This is a no-op when Emacs is running in batch mode."
@@ -525,6 +525,7 @@ This is a no-op when Emacs is running in batch mode."
525 (message "Desktop loaded.")) 525 (message "Desktop loaded."))
526 (desktop-clear))))) 526 (desktop-clear)))))
527;; ---------------------------------------------------------------------------- 527;; ----------------------------------------------------------------------------
528;;;###autoload
528(defun desktop-load-default () 529(defun desktop-load-default ()
529 "Load the `default' start-up library manually. 530 "Load the `default' start-up library manually.
530Also inhibit further loading of it. Call this from your `.emacs' file 531Also inhibit further loading of it. Call this from your `.emacs' file