branch: externals/tempel
commit 40de509ff635b75d877d83d42d8e36672fdcc47d
Author: Daniel Mendler <m...@daniel-mendler.de>
Commit: Daniel Mendler <m...@daniel-mendler.de>
Fix file loading bug (Fix #40)
---
tempel.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/tempel.el b/tempel.el
index 93397e80c7..ada8a190ce 100644
--- a/tempel.el
+++ b/tempel.el
@@ -304,7 +304,7 @@ INIT is the optional initial input."
('% (unless (or (eolp) (save-excursion (re-search-forward "\\=\\s-*$" nil
t)))
(insert "\n")))
('o (unless (or (eolp) (save-excursion (re-search-forward "\\=\\s-*$" nil
t)))
- (open-line 1)))
+ (open-line 1)))
(`(s ,name) (tempel--field st name))
(`(l . ,lst) (dolist (e lst) (tempel--element st region e)))
((or 'p `(,(or 'p 'P) . ,rest)) (apply #'tempel--placeholder st rest))
@@ -390,7 +390,7 @@ PROMPT is the optional prompt/default value."
(let ((data (read (current-buffer))) result)
(while data
(let (modes plist templates)
- (while (and (symbolp (car data)) (not (keywordp (car data))))
+ (while (and (car data) (symbolp (car data)) (not (keywordp (car
data))))
(push (pop data) modes))
(while (keywordp (car data))
(push (pop data) plist)
