# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1057611868 0
# Node ID 96c06b4589663dd9a796d1760ab9af991a96c570
# Parent  7a3de98ae80147bdcba6be3e324d3058bb157e96
(desktop-buffer-info, desktop-buffer-mh): Use with-no-warnings.

diff -r 7a3de98ae801 -r 96c06b458966 lisp/desktop.el
--- a/lisp/desktop.el	Mon Jul 07 21:03:32 2003 +0000
+++ b/lisp/desktop.el	Mon Jul 07 21:04:28 2003 +0000
@@ -795,7 +795,8 @@
 	      (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 @@
 ;; ----------------------------------------------------------------------------
 (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))))