diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/net/dig.el | 11 |
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. |
| 50 | If nil, use system defaults." | 49 | If 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 |