emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] master 983436d 07/12: Define gnus-diary-kill-entire-line u


From: Lars Ingebrigtsen
Subject: [Emacs-diffs] master 983436d 07/12: Define gnus-diary-kill-entire-line unconditionally
Date: Sat, 13 Feb 2016 06:17:18 +0000

branch: master
commit 983436de735ac25dccc13262ffdf7ca016842621
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    Define gnus-diary-kill-entire-line unconditionally
    
    * lisp/gnus/gnus-diary.el (gnus-diary-kill-entire-line):
    Define unconditionally.
---
 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 6f0bfe6..af278b4 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:
 
 ;; Compatibility functions ==================================================
 
-(eval-and-compile
-  (if (fboundp 'kill-entire-line)
-      (defalias 'gnus-diary-kill-entire-line 'kill-entire-line)
-    (defun gnus-diary-kill-entire-line ()
-      (beginning-of-line)
-      (let ((kill-whole-line t))
-       (kill-line)))))
+(defun gnus-diary-kill-entire-line ()
+  (beginning-of-line)
+  (let ((kill-whole-line t))
+    (kill-line)))
 
 
 ;; Summary line format ======================================================



reply via email to

[Prev in Thread] Current Thread [Next in Thread]