emacs-elpa-diffs
[Top][All Lists]
Advanced

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

[nongnu] elpa/org-contrib caf613d8c6: org-depend: Fix obsoletion warning


From: ELPA Syncer
Subject: [nongnu] elpa/org-contrib caf613d8c6: org-depend: Fix obsoletion warnings
Date: Sat, 20 Aug 2022 07:58:54 -0400 (EDT)

branch: elpa/org-contrib
commit caf613d8c620d0e4f28ff645469ecd3de8eb85d5
Author: Ihor Radchenko <yantar92@gmail.com>
Commit: Ihor Radchenko <yantar92@gmail.com>

    org-depend: Fix obsoletion warnings
    
    * lisp/org-depend.el (org-depend-trigger-todo): `position' ->
    `cl-position', `subseq' -> `cl-subseq'.
---
 lisp/org-depend.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lisp/org-depend.el b/lisp/org-depend.el
index db7df8a559..1d6e7eccaa 100644
--- a/lisp/org-depend.el
+++ b/lisp/org-depend.el
@@ -281,9 +281,9 @@ This does two different kinds of triggers:
                              (from-bottom items)
                              ((or from-current no-wrap)
                               (let* ((items (nreverse items))
-                                     (pos (position this-item items :key 
#'first))
-                                     (items-before (subseq items 0 pos))
-                                     (items-after (subseq items pos)))
+                                     (pos (cl-position this-item items :key 
#'cl-first))
+                                     (items-before (cl-subseq items 0 pos))
+                                     (items-after (cl-subseq items pos)))
                                 (if no-wrap items-after
                                   (append items-after items-before))))
                              (t (nreverse items))))



reply via email to

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