diff options
| author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-02-16 22:21:28 +0100 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-02-16 22:21:28 +0100 |
| commit | 41d54012368ca33461fe3e8668c2b0e3052af3b8 (patch) | |
| tree | 52137aa1371e7c1ec81b95508a504eabba3b0bc3 /elisp/geiser-syntax.el | |
| parent | fbc65dfc767da1dc3b28262eae041e9d303752c2 (diff) | |
| download | geiser-guile-41d54012368ca33461fe3e8668c2b0e3052af3b8.tar.gz geiser-guile-41d54012368ca33461fe3e8668c2b0e3052af3b8.tar.bz2 | |
New command to open module file.
Diffstat (limited to 'elisp/geiser-syntax.el')
| -rw-r--r-- | elisp/geiser-syntax.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/elisp/geiser-syntax.el b/elisp/geiser-syntax.el index 1897898..6577152 100644 --- a/elisp/geiser-syntax.el +++ b/elisp/geiser-syntax.el @@ -39,9 +39,8 @@ (with-current-buffer buffer (save-excursion (goto-char (point-min)) - (if (re-search-forward geiser-syntax--module-definition-re nil t) - (match-string-no-properties 1) - "#f"))))) + (when (re-search-forward geiser-syntax--module-definition-re nil t) + (match-string-no-properties 1)))))) ;;; Indentation: |