[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/desktop.el,v
From: |
Juanma Barranquero |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/desktop.el,v |
Date: |
Sat, 01 Mar 2008 14:16:51 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Changes by: Juanma Barranquero <lektu> 08/03/01 14:16:50
Index: desktop.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/desktop.el,v
retrieving revision 1.124
retrieving revision 1.125
diff -u -b -r1.124 -r1.125
--- desktop.el 29 Feb 2008 03:02:25 -0000 1.124
+++ desktop.el 1 Mar 2008 14:16:50 -0000 1.125
@@ -969,11 +969,11 @@
(or (null desktop-load-locked-desktop)
(not (y-or-n-p (format "Warning: desktop file appears to
be in use by PID %s.\n\
Using it may cause conflicts. Use it anyway? " owner)))))
- (progn
(let ((default-directory desktop-dirname))
- (run-hooks 'desktop-not-loaded-hook))
(setq desktop-dirname nil)
- (message "Desktop file in use; not loaded."))
+ (run-hooks 'desktop-not-loaded-hook)
+ (unless desktop-dirname
+ (message "Desktop file in use; not loaded.")))
(desktop-lazy-abort)
;; Evaluate desktop buffer and remember when it was modified.
(load (desktop-full-file-name) t t t)
- [Emacs-diffs] Changes to emacs/lisp/desktop.el,v,
Juanma Barranquero <=