summary refs log tree commit diff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/guile/skribilo/ast.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/guile/skribilo/ast.scm b/src/guile/skribilo/ast.scm
index 5146f75..534b832 100644
--- a/src/guile/skribilo/ast.scm
+++ b/src/guile/skribilo/ast.scm
@@ -580,7 +580,7 @@
      ((pred obj)
       (loop (ast-parent obj) (cons obj res)))
      (else
-      (loop (ast-parent obj) (cons obj res))))))
+      (loop (ast-parent obj) res)))))
 
 (define (find1-up pred obj)
   (let loop ((obj obj))