andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Make "--no-desktop" turn off `desktop-save-mode'.

Browse source
This commit is contained in:
Lars Hansen 2005-04-18 18:27:39 +00:00
parent 25bcb3535c
commit 4b217d4608
1 changed files with 4 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
lisp/desktop.el
View file

@ -1030,9 +1030,10 @@ If there are no buffers left to create, kill the timer."
'after-init-hook
'(lambda ()
(let ((key "--no-desktop"))
(if (member key command-line-args)
(delete key command-line-args)
(when desktop-save-mode (desktop-read))))))
(when (member key command-line-args)
(setq command-line-args (delete key command-line-args))
(setq desktop-save-mode nil)))
(when desktop-save-mode (desktop-read))))
(provide 'desktop)