(dig): Use with-no-warnings.

diff --git a/lisp/net/net-utils.el b/lisp/net/net-utils.el
index 4a54702643a8578ff6de4dea726ca7f741ebf898..203d19ce14e1a965c6d7b8fd6223f936a70f1f15 100644 (file)
--- 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 "** "