[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/checkdoc.el
From: |
Sam Steingold |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/checkdoc.el |
Date: |
Tue, 27 Nov 2001 10:52:54 -0500 |
Index: emacs/lisp/emacs-lisp/checkdoc.el
diff -u emacs/lisp/emacs-lisp/checkdoc.el:1.23
emacs/lisp/emacs-lisp/checkdoc.el:1.24
--- emacs/lisp/emacs-lisp/checkdoc.el:1.23 Sat Nov 17 17:51:11 2001
+++ emacs/lisp/emacs-lisp/checkdoc.el Tue Nov 27 10:52:52 2001
@@ -176,18 +176,18 @@
;; From custom web page for compatibility between versions of custom:
(eval-and-compile
- (condition-case ()
- (require 'custom)
- (error nil))
- (if (and (featurep 'custom) (fboundp 'custom-declare-variable))
- nil ;; We've got what we needed
- ;; We have the old custom-library, hack around it!
- (defmacro defgroup (&rest args)
- nil)
- (defmacro custom-add-option (&rest args)
- nil)
- (defmacro defcustom (var value doc &rest args)
- (` (defvar (, var) (, value) (, doc))))))
+ (condition-case ()
+ (require 'custom)
+ (error nil))
+ (if (and (featurep 'custom) (fboundp 'custom-declare-variable))
+ nil ;; We've got what we needed
+ ;; We have the old custom-library, hack around it!
+ (defmacro defgroup (&rest args)
+ nil)
+ (defmacro custom-add-option (&rest args)
+ nil)
+ (defmacro defcustom (var value doc &rest args)
+ `(defvar ,var ,value ,doc))))
(defcustom checkdoc-autofix-flag 'semiautomatic
"*Non-nil means attempt auto-fixing of doc strings.