summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/gulp.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2000-06-12 05:08:46 +0000
committerStefan Monnier <monnier@iro.umontreal.ca>2000-06-12 05:08:46 +0000
commit811ec3a8df8a14b490f4309f566c2b4ce93b955f (patch)
treef7ce6128868842df03650471193074fc437e5125 /lisp/emacs-lisp/gulp.el
parent72d8b544c6eff21e8d5aad013a31fbfc1979a4d0 (diff)
downloademacs-811ec3a8df8a14b490f4309f566c2b4ce93b955f.tar.gz
(gulp-send-requests): Don't quote lambda.
Diffstat (limited to 'lisp/emacs-lisp/gulp.el')
-rw-r--r--lisp/emacs-lisp/gulp.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/emacs-lisp/gulp.el b/lisp/emacs-lisp/gulp.el
index 096460a1961..877e62255b3 100644
--- a/lisp/emacs-lisp/gulp.el
+++ b/lisp/emacs-lisp/gulp.el
@@ -103,11 +103,11 @@ is left in the `*gulp*' buffer at the end."
(while (setq node (car m-p-alist))
(setq msg (gulp-create-message (cdr node) time))
(setq mail-setup-hook
- '(lambda ()
- (mail-subject)
- (insert "It's time for Emacs updates again")
- (goto-char (point-max))
- (insert msg)))
+ (lambda ()
+ (mail-subject)
+ (insert "It's time for Emacs updates again")
+ (goto-char (point-max))
+ (insert msg)))
(mail nil (car node))
(goto-char (point-min))
(if (y-or-n-p "Send? ") (mail-send)