Richard Stallman said:
> Does this patch give results you like?
>
> *** desktop.el 05 Apr 2005 15:08:34 -0400 1.82
> --- desktop.el 18 Apr 2005 01:22:51 -0400
> ***************
> *** 1031,1037 ****
> '(lambda ()
> (let ((key "--no-desktop"))
> (if (member key command-line-args)
> ! (delete key command-line-args)
> (when desktop-save-mode (desktop-read))))))
>
> (provide 'desktop)
> --- 1031,1039 ----
> '(lambda ()
> (let ((key "--no-desktop"))
> (if (member key command-line-args)
> ! (progn
> ! (delete key command-line-args)
> ! (desktop-save-mode 0))
> (when desktop-save-mode (desktop-read))))))
>
> (provide 'desktop)
Yes it does.
However as others have pointed out, (desktop-read) at a later time
should reenable desktop-save-mode which it does not right now.
This patch would do it. If it's clean enough someone should commit
it too.
*** desktop.el Mon Apr 18 20:04:26 2005 1.82
--- desktop.el Mon Apr 18 20:13:15 2005
***************
*** 763,769 ****
(format ", %d to restore lazily"
(length desktop-buffer-args-list))
""))
! t)
;; No desktop file found.
(desktop-clear)
(let ((default-directory desktop-dirname))
--- 763,769 ----
(format ", %d to restore lazily"
(length desktop-buffer-args-list))
""))
! (desktop-save-mode 1))
;; No desktop file found.
(desktop-clear)
(let ((default-directory desktop-dirname))
--
Stephan Stahl
_______________________________________________
Emacs-devel mailing list
Emacs-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-devel
