Mercurial > emacs
comparison lisp/calendar/appt.el @ 95411:7a388916f4ae
(appt-check): Use diary-display-function rather than diary-display-hook.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Fri, 30 May 2008 02:57:43 +0000 |
| parents | e49abd957e81 |
| children | f9c7bc38ee36 |
comparison
equal
deleted
inserted
replaced
| 95410:d933144b818e | 95411:7a388916f4ae |
|---|---|
| 328 (let ((diary-hook | 328 (let ((diary-hook |
| 329 (if (assoc 'appt-make-list diary-hook) | 329 (if (assoc 'appt-make-list diary-hook) |
| 330 diary-hook | 330 diary-hook |
| 331 (cons 'appt-make-list diary-hook)))) | 331 (cons 'appt-make-list diary-hook)))) |
| 332 (diary)) | 332 (diary)) |
| 333 (let* ((diary-display-hook 'appt-make-list) | 333 (let* ((diary-display-function 'appt-make-list) |
| 334 (d-buff (find-buffer-visiting | 334 (d-buff (find-buffer-visiting |
| 335 (substitute-in-file-name diary-file))) | 335 (substitute-in-file-name diary-file))) |
| 336 (selective | 336 (selective |
| 337 (if d-buff ; diary buffer exists | 337 (if d-buff ; diary buffer exists |
| 338 (with-current-buffer d-buff | 338 (with-current-buffer d-buff |