branch: externals/denote-sequence
commit f4bfb697f28a460a3904cf8e982e9caedeaf39ef
Author: Peter Prevos <pe...@prevos.net>
Commit: Peter Prevos <pe...@prevos.net>

    Fixed detection of all parents
    
    The while loop was stuck in infinity when finding a note's ancestors 
(all-parents)
---
 denote-sequence.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/denote-sequence.el b/denote-sequence.el
index 8ce3c3314c..d6e627bcd7 100644
--- a/denote-sequence.el
+++ b/denote-sequence.el
@@ -711,7 +711,7 @@ returned by `denote-sequence-get-all-files'."
     (pcase type
       ('all-parents (let ((parents nil)
                           (butlast (butlast components)))
-                      (while (>= (length butlast) 1)
+                      (while (> (length butlast) 1)
                         (when-let* ((prefix (denote-sequence-join butlast 
scheme))
                                     (parent (seq-find
                                              (lambda (file)

Reply via email to