diff options
| -rw-r--r-- | lisp/gnus/gnus-diary.el | 11 |
1 files changed, 4 insertions, 7 deletions
diff --git a/lisp/gnus/gnus-diary.el b/lisp/gnus/gnus-diary.el index 6f0bfe6766f..af278b4427d 100644 --- a/lisp/gnus/gnus-diary.el +++ b/lisp/gnus/gnus-diary.el | |||
| @@ -83,13 +83,10 @@ There are currently two built-in format functions: | |||
| 83 | 83 | ||
| 84 | ;; Compatibility functions ================================================== | 84 | ;; Compatibility functions ================================================== |
| 85 | 85 | ||
| 86 | (eval-and-compile | 86 | (defun gnus-diary-kill-entire-line () |
| 87 | (if (fboundp 'kill-entire-line) | 87 | (beginning-of-line) |
| 88 | (defalias 'gnus-diary-kill-entire-line 'kill-entire-line) | 88 | (let ((kill-whole-line t)) |
| 89 | (defun gnus-diary-kill-entire-line () | 89 | (kill-line))) |
| 90 | (beginning-of-line) | ||
| 91 | (let ((kill-whole-line t)) | ||
| 92 | (kill-line))))) | ||
| 93 | 90 | ||
| 94 | 91 | ||
| 95 | ;; Summary line format ====================================================== | 92 | ;; Summary line format ====================================================== |