From af444953525c12f43fa16dd0222acecb395b7027 Mon Sep 17 00:00:00 2001
From: Greg Sexton <gregsexton@gmail.com>
Date: Sun, 10 Aug 2014 16:54:21 +0100
Subject: [PATCH] Fix elisp parser bug

---
 origami-parsers.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/origami-parsers.el b/origami-parsers.el
index 4da7351..3158b40 100644
--- 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))))))