[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))))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [nongnu] elpa/org-contrib caf613d8c6: org-depend: Fix obsoletion warnings,
ELPA Syncer <=