emacs-diffs
[Top][All Lists]
Advanced

[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.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]