Fix elisp parser bug

2014-08-10 16:54:21 +01:00 · 2014-08-10 16:54:21 +01:00 · af44495352
commit af44495352
parent 9d6003f90b
1 changed files with 2 additions and 1 deletions
--- a/origami-parsers.el
+++ b/origami-parsers.el
@ -80,7 +80,8 @@ children of the pair."
          (end-of-defun)
          (backward-char)
          (setq end (point))
-          (setq acc (cons (funcall create beg end offset nil) acc))
+          (when (> offset 0)
+            (setq acc (cons (funcall create beg end offset nil) acc)))
          (beginning-of-defun -1))
        (list (reverse acc))))))