From c4e2f5679fac46fddfb44535478e32ae07743b2e Mon Sep 17 00:00:00 2001 From: Lars Hansen Date: Wed, 21 Apr 2004 20:48:48 +0000 Subject: [PATCH] (mh-restore-desktop-buffer): Move from desktop.el. Add Parameters. --- lisp/mh-e/mh-e.el | 12 ++++++++++++ 1 file changed, 12 insertions(+) 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: -- 2.39.5