* lisp/textmodes/rst.el (rst-compile-toolsets): Add pdf and s5 to option alist.

[gnu-emacs] / lisp / desktop.el

diff --git a/lisp/desktop.el b/lisp/desktop.el
index c247565af20dcc53ae53b56874263a3b3cf4c028..b4d3dfd55c87e6e772bef399a1853708dfc5d6b8 100644 (file)
--- a/lisp/desktop.el
+++ b/lisp/desktop.el
@@ -622,7 +622,10 @@ is nil, ask the user where to save the desktop."
   (when (and desktop-save-mode
              (let ((exists (file-exists-p (desktop-full-file-name))))
                (or (eq desktop-save t)
-                   (and exists (memq desktop-save '(ask-if-new if-exists)))
+                   (and exists (eq desktop-save 'if-exists))
+                  ;; If it exists, but we aren't using it, we are going
+                  ;; to ask for a new directory below.
+                   (and exists desktop-dirname (eq desktop-save 'ask-if-new))
                    (and
                     (or (memq desktop-save '(ask ask-if-new))
                         (and exists (eq desktop-save 'ask-if-exists)))