From 6df8016c931e3007459a47661b1a567f10d39a0d Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 7 Jul 2003 21:04:28 +0000 Subject: [PATCH] (desktop-buffer-info, desktop-buffer-mh): Use with-no-warnings. --- lisp/desktop.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/lisp/desktop.el b/lisp/desktop.el index 932063ebec4..4c3a6be176f 100644 --- a/lisp/desktop.el +++ b/lisp/desktop.el @@ -795,7 +795,8 @@ This function always sets `desktop-enable' to t." (second (nth 1 desktop-buffer-misc))) (when (and first second) (require 'info) - (Info-find-node first second) + (with-no-warnings + (Info-find-node first second)) (current-buffer)))))) ;; ---------------------------------------------------------------------------- @@ -814,7 +815,7 @@ This function always sets `desktop-enable' to t." ;; ---------------------------------------------------------------------------- (defun desktop-buffer-mh () "Load a folder in the mh system." (if (eq 'mh-folder-mode desktop-buffer-major-mode) - (progn + (with-no-warnings (mh-find-path) (mh-visit-folder desktop-buffer-name) (current-buffer))))