# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1231123771 0
# Node ID 43e72c1cf36e926f9b74b92d48cd16f747dbd389
# Parent  59e11bc5f33000b03fe1c765d92f20c47c7a4827
* desktop.el (desktop-save-in-desktop-dir): Use `abbreviate-file-name'
  to shorten the desktop file directory shown in message.

diff -r 59e11bc5f330 -r 43e72c1cf36e lisp/ChangeLog
--- a/lisp/ChangeLog	Mon Jan 05 02:17:07 2009 +0000
+++ b/lisp/ChangeLog	Mon Jan 05 02:49:31 2009 +0000
@@ -1,3 +1,8 @@
+2009-01-05  Juanma Barranquero  <lekktu@gmail.com>
+
+	* desktop.el (desktop-save-in-desktop-dir): Use `abbreviate-file-name'
+	to shorten the desktop file directory shown in message.
+
 2009-01-05  Glenn Morris  <rgm@gnu.org>
 
 	* version.el (emacs-copyright):
diff -r 59e11bc5f330 -r 43e72c1cf36e lisp/desktop.el
--- a/lisp/desktop.el	Mon Jan 05 02:17:07 2009 +0000
+++ b/lisp/desktop.el	Mon Jan 05 02:49:31 2009 +0000
@@ -1047,7 +1047,7 @@
   (if desktop-dirname
       (desktop-save desktop-dirname)
     (call-interactively 'desktop-save))
-  (message "Desktop saved in %s" desktop-dirname))
+  (message "Desktop saved in %s" (abbreviate-file-name desktop-dirname)))
 
 ;; ----------------------------------------------------------------------------
 ;;;###autoload