From: Lars Hansen <larsh@soem.dk>
Date: Wed, 21 Apr 2004 20:48:48 +0000 (+0000)
Subject: (mh-restore-desktop-buffer): Move from desktop.el. Add Parameters.
X-Git-Tag: ttn-vms-21-2-B4~6674
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c4e2f5679fac46fddfb44535478e32ae07743b2e;p=emacs.git

(mh-restore-desktop-buffer): Move from desktop.el. Add Parameters.
---

diff --git a/lisp/mh-e/mh-e.el b/lisp/mh-e/mh-e.el
index c4b027f382f..1db42327b53 100644
--- a/lisp/mh-e/mh-e.el
+++ b/lisp/mh-e/mh-e.el
@@ -2441,6 +2441,18 @@ well.")
                 "^There is no other window$"))
   (add-to-list 'debug-ignored-errors mess))
 
+;;;;  Desktop support
+
+;;;###autoload
+(defun mh-restore-desktop-buffer (desktop-buffer-file-name
+                                  desktop-buffer-name
+                                  desktop-buffer-misc)
+  "Restore an mh folder buffer specified in a desktop file."
+  (with-no-warnings
+    (mh-find-path)
+    (mh-visit-folder desktop-buffer-name)
+    (current-buffer)))
+
 (provide 'mh-e)
 
 ;;; Local Variables: