Mercurial > emacs
comparison lisp/emacs-lisp/checkdoc.el @ 41608:45db352a0971
Converted backquote to the new style.
| author | Sam Steingold <sds@gnu.org> |
|---|---|
| date | Tue, 27 Nov 2001 15:52:52 +0000 |
| parents | 3d601db16361 |
| children | be541feb06cc |
comparison
equal
deleted
inserted
replaced
| 41607:58e03d744b9f | 41608:45db352a0971 |
|---|---|
| 174 (defvar checkdoc-version "0.6.1" | 174 (defvar checkdoc-version "0.6.1" |
| 175 "Release version of checkdoc you are currently running.") | 175 "Release version of checkdoc you are currently running.") |
| 176 | 176 |
| 177 ;; From custom web page for compatibility between versions of custom: | 177 ;; From custom web page for compatibility between versions of custom: |
| 178 (eval-and-compile | 178 (eval-and-compile |
| 179 (condition-case () | 179 (condition-case () |
| 180 (require 'custom) | 180 (require 'custom) |
| 181 (error nil)) | 181 (error nil)) |
| 182 (if (and (featurep 'custom) (fboundp 'custom-declare-variable)) | 182 (if (and (featurep 'custom) (fboundp 'custom-declare-variable)) |
| 183 nil ;; We've got what we needed | 183 nil ;; We've got what we needed |
| 184 ;; We have the old custom-library, hack around it! | 184 ;; We have the old custom-library, hack around it! |
| 185 (defmacro defgroup (&rest args) | 185 (defmacro defgroup (&rest args) |
| 186 nil) | 186 nil) |
| 187 (defmacro custom-add-option (&rest args) | 187 (defmacro custom-add-option (&rest args) |
| 188 nil) | 188 nil) |
| 189 (defmacro defcustom (var value doc &rest args) | 189 (defmacro defcustom (var value doc &rest args) |
| 190 (` (defvar (, var) (, value) (, doc)))))) | 190 `(defvar ,var ,value ,doc)))) |
| 191 | 191 |
| 192 (defcustom checkdoc-autofix-flag 'semiautomatic | 192 (defcustom checkdoc-autofix-flag 'semiautomatic |
| 193 "*Non-nil means attempt auto-fixing of doc strings. | 193 "*Non-nil means attempt auto-fixing of doc strings. |
| 194 If this value is the symbol `query', then the user is queried before | 194 If this value is the symbol `query', then the user is queried before |
| 195 any change is made. If the value is `automatic', then all changes are | 195 any change is made. If the value is `automatic', then all changes are |