aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/net/dig.el11
1 files changed, 4 insertions, 7 deletions
diff --git a/lisp/net/dig.el b/lisp/net/dig.el
index 852d8ae0491..f36999119f2 100644
--- a/lisp/net/dig.el
+++ b/lisp/net/dig.el
@@ -1,4 +1,4 @@
1;;; dig.el --- Domain Name System dig interface 1;;; dig.el --- Domain Name System dig interface -*- lexical-binding:t -*-
2 2
3;; Copyright (C) 2000-2020 Free Software Foundation, Inc. 3;; Copyright (C) 2000-2020 Free Software Foundation, Inc.
4 4
@@ -42,15 +42,13 @@
42 42
43(defcustom dig-program "dig" 43(defcustom dig-program "dig"
44 "Name of dig (domain information groper) binary." 44 "Name of dig (domain information groper) binary."
45 :type 'file 45 :type 'file)
46 :group 'dig)
47 46
48(defcustom dig-dns-server nil 47(defcustom dig-dns-server nil
49 "DNS server to query. 48 "DNS server to query.
50If nil, use system defaults." 49If nil, use system defaults."
51 :type '(choice (const :tag "System defaults") 50 :type '(choice (const :tag "System defaults")
52 string) 51 string))
53 :group 'dig)
54 52
55(defcustom dig-font-lock-keywords 53(defcustom dig-font-lock-keywords
56 '(("^;; [A-Z]+ SECTION:" 0 font-lock-keyword-face) 54 '(("^;; [A-Z]+ SECTION:" 0 font-lock-keyword-face)
@@ -58,8 +56,7 @@ If nil, use system defaults."
58 ("^; <<>>.*" 0 font-lock-type-face) 56 ("^; <<>>.*" 0 font-lock-type-face)
59 ("^;.*" 0 font-lock-function-name-face)) 57 ("^;.*" 0 font-lock-function-name-face))
60 "Default expressions to highlight in dig mode." 58 "Default expressions to highlight in dig mode."
61 :type 'sexp 59 :type 'sexp)
62 :group 'dig)
63 60
64(defun dig-invoke (domain &optional 61(defun dig-invoke (domain &optional
65 query-type query-class query-option 62 query-type query-class query-option