[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 765dcc7: Remove redundant redefinition of seq-drop-
From: |
Oleh Krehel |
Subject: |
[Emacs-diffs] master 765dcc7: Remove redundant redefinition of seq-drop-while from seq.el |
Date: |
Wed, 09 Sep 2015 13:10:30 +0000 |
branch: master
commit 765dcc709c6bbb0ae246e5f680daa585f3f53573
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>
Remove redundant redefinition of seq-drop-while from seq.el
* lisp/emacs-lisp/seq.el (seq-drop-while): Define only once.
---
lisp/emacs-lisp/seq.el | 8 +-------
1 files changed, 1 insertions(+), 7 deletions(-)
diff --git a/lisp/emacs-lisp/seq.el b/lisp/emacs-lisp/seq.el
index 8dc9147..751c18f 100644
--- a/lisp/emacs-lisp/seq.el
+++ b/lisp/emacs-lisp/seq.el
@@ -417,13 +417,7 @@ If no element is found, return nil."
(nreverse result)))
(cl-defmethod seq-drop-while (pred (list list))
- "Optimized implementation of `seq-drop-while' for lists"
- (while (and list (funcall pred (car list)))
- (setq list (cdr list)))
- list)
-
-(cl-defmethod seq-drop-while (pred (list list))
- "Optimized implementation of `seq-drop-while' for lists"
+ "Optimized implementation of `seq-drop-while' for lists."
(while (and list (funcall pred (car list)))
(setq list (cdr list)))
list)
- [Emacs-diffs] master 765dcc7: Remove redundant redefinition of seq-drop-while from seq.el,
Oleh Krehel <=