From 80b7547ea861959d9578886239df838344573edb Mon Sep 17 00:00:00 2001 From: Greg Sexton Date: Sat, 16 Aug 2014 19:26:51 +0100 Subject: [PATCH] Elisp parser shows defun args --- origami-parsers.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/origami-parsers.el b/origami-parsers.el index 3158b40..630cb29 100644 --- a/origami-parsers.el +++ b/origami-parsers.el @@ -75,7 +75,7 @@ children of the pair." (let (beg end offset acc) (while (< (point) (point-max)) (setq beg (point)) - (search-forward-regexp "(def\\w*\\s-*\\(\\s_\\|\\w\\)*" nil t) + (search-forward-regexp "(def\\w*\\s-*\\(\\s_\\|\\w\\|[?!]\\)*\\([ \\t]*(.*?)\\)?" nil t) (setq offset (- (point) beg)) (end-of-defun) (backward-char)