[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/mail/feedmail.el
From: |
Sam Steingold |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/mail/feedmail.el |
Date: |
Tue, 27 Nov 2001 10:53:01 -0500 |
Index: emacs/lisp/mail/feedmail.el
diff -u emacs/lisp/mail/feedmail.el:1.15 emacs/lisp/mail/feedmail.el:1.16
--- emacs/lisp/mail/feedmail.el:1.15 Thu Sep 27 06:54:32 2001
+++ emacs/lisp/mail/feedmail.el Tue Nov 27 10:52:52 2001
@@ -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")
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/mail/feedmail.el,
Sam Steingold <=