summaryrefslogtreecommitdiff
path: root/geiser-guile.el
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2020-12-02 18:43:18 +0000
committerjao <jao@gnu.org>2020-12-02 18:43:18 +0000
commit583674931793540ca24dacd73d1b6b95977b16d2 (patch)
tree68eb25eee5ac7fa1c40a1fa54cd388debbcf1120 /geiser-guile.el
parent6e8add26f653d4b24f61773b027baa0265e4920d (diff)
downloadgeiser-guile-583674931793540ca24dacd73d1b6b95977b16d2.tar.gz
geiser-guile-583674931793540ca24dacd73d1b6b95977b16d2.tar.bz2
Library declaration recognition (Arun Isaac)
Diffstat (limited to 'geiser-guile.el')
-rw-r--r--geiser-guile.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/geiser-guile.el b/geiser-guile.el
index afb8951..fc8f3c8 100644
--- a/geiser-guile.el
+++ b/geiser-guile.el
@@ -188,8 +188,9 @@ This function uses `geiser-guile-init-file' if it exists."
(save-excursion
(geiser-syntax--pop-to-top)
(if (or (re-search-backward geiser-guile--module-re nil t)
- (looking-at geiser-guile--library-re)
- (re-search-forward geiser-guile--module-re nil t))
+ (re-search-backward geiser-guile--library-re nil t)
+ (re-search-forward geiser-guile--module-re nil t)
+ (re-search-forward geiser-guile--library-re nil t))
(geiser-guile--get-module (match-string-no-properties 1))
:f)))
((listp module) module)