[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/desktop.el,v [EMACS_22_BASE]
From: |
Juanma Barranquero |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/desktop.el,v [EMACS_22_BASE] |
Date: |
Fri, 29 Feb 2008 02:57:40 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Branch: EMACS_22_BASE
Changes by: Juanma Barranquero <lektu> 08/02/29 02:57:40
Index: desktop.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/desktop.el,v
retrieving revision 1.108.2.8
retrieving revision 1.108.2.9
diff -u -b -r1.108.2.8 -r1.108.2.9
--- desktop.el 12 Feb 2008 23:30:03 -0000 1.108.2.8
+++ desktop.el 29 Feb 2008 02:57:39 -0000 1.108.2.9
@@ -895,8 +895,9 @@
"desktop-append-buffer-args")
" "
desktop-file-version)
- ;; If the base name is non-nil, we save it instead of the
buffer name
- (when base (setcar (nthcdr 1 l) base))
+ ;; If there's a non-empty base name, we save it instead of the
buffer name
+ (when (and base (not (string= base "")))
+ (setcar (nthcdr 1 l) base))
(dolist (e l)
(insert "\n " (desktop-value-to-string e)))
(insert ")\n\n"))))