/[emacs]/emacs/lisp/emacs-lisp/gulp.el
ViewVC logotype

Diff of /emacs/lisp/emacs-lisp/gulp.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.10 by pj, Sun Jul 15 16:15:34 2001 UTC revision 1.10.8.1 by miles, Fri Apr 4 06:20:16 2003 UTC
# Line 103  is left in the `*gulp*' buffer at the en Line 103  is left in the `*gulp*' buffer at the en
103        (while (setq node (car m-p-alist))        (while (setq node (car m-p-alist))
104          (setq msg (gulp-create-message (cdr node) time))          (setq msg (gulp-create-message (cdr node) time))
105          (setq mail-setup-hook          (setq mail-setup-hook
106                (lambda ()                (lambda ()
107                  (mail-subject)                  (mail-subject)
108                  (insert "It's time for Emacs updates again")                  (insert "It's time for Emacs updates again")
109                  (goto-char (point-max))                  (goto-char (point-max))
# Line 171  That is a list of elements, each of the Line 171  That is a list of elements, each of the
171          (if (= (length mnt) 0) (setq mnt nil))) ;; "^;; Author: $" --> nil          (if (= (length mnt) 0) (setq mnt nil))) ;; "^;; Author: $" --> nil
172        (cons mnt timest))))        (cons mnt timest))))
173    
174    (provide 'gulp)
175    
176  ;;; gulp.el ends here  ;;; gulp.el ends here

Legend:
Removed from v.1.10  
changed lines
  Added in v.1.10.8.1

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26