diff lisp/mail/feedmail.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 7ff02d7c4baf
children 0f4506820432
line wrap: on
line diff
--- a/lisp/mail/feedmail.el	Tue Nov 27 05:26:27 2001 +0000
+++ b/lisp/mail/feedmail.el	Tue Nov 27 15:52:52 2001 +0000
@@ -291,16 +291,16 @@
 ;; If you write software that must work without the new custom, you
 ;; can use this hack stolen from w3-cus.el:
 (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 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 defcustom (var value doc &rest args)
+       `(defvar ,var ,value ,doc))))
 
 (eval-when-compile (require 'smtpmail))
 (autoload 'mail-do-fcc "sendmail")