From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 14 May 2005 11:28:14 +0000 (+0000)
Subject: (dig): Use with-no-warnings.
X-Git-Tag: ttn-vms-21-2-B4~320
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7fe92d22bde9976a9ed49d57a4cd3df8798154ba;p=emacs.git

(dig): Use with-no-warnings.
---

diff --git a/lisp/net/net-utils.el b/lisp/net/net-utils.el
index 4a54702643a..203d19ce14e 100644
--- a/lisp/net/net-utils.el
+++ b/lisp/net/net-utils.el
@@ -468,7 +468,8 @@ If your system's ping continues until interrupted, you can try setting
       (require 'ffap)
       (read-from-minibuffer
        "Lookup host: "
-       (or (ffap-string-at-point 'machine) "")))))
+       (with-no-warnings
+	 (or (ffap-string-at-point 'machine) ""))))))
   (net-utils-run-program
    "Dig"
    (concat "** "