(dig): Use with-no-warnings.

1 files changed, 2 insertions, 1 deletions

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 "** "