~mdw
/
skel
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
skel-do-fill-in: Save match data properly.
[skel]
/
skel.el.in
diff --git
a/skel.el.in
b/skel.el.in
index
86ce7eb
..
0ce3831
100644
(file)
--- a/
skel.el.in
+++ b/
skel.el.in
@@
-138,7
+138,7
@@
(let ((pair (assq name skel-alist))
value)
(if pair
(let ((pair (assq name skel-alist))
value)
(if pair
- (s
ave-match-data (setq value (eval (cdr pair)
)))
+ (s
etq value (eval (cdr pair
)))
(setq value (read-string (format "Value for %s: " name)))
(setq skel-alist (cons (cons name value) skel-alist)))
value))
(setq value (read-string (format "Value for %s: " name)))
(setq skel-alist (cons (cons name value) skel-alist)))
value))
@@
-151,7
+151,9
@@
buffer at this point."
(if (re-search-forward "\\[\\[\\([^]]*\\)\\]\\]" nil t)
(progn
buffer at this point."
(if (re-search-forward "\\[\\[\\([^]]*\\)\\]\\]" nil t)
(progn
- (replace-match (skel-lookup (match-string 1)) t t nil)
+ (replace-match (save-match-data
+ (skel-lookup (match-string 1)))
+ t t nil)
(goto-char (match-beginning 0))
(skel-do-fill-in))))
(goto-char (match-beginning 0))
(skel-do-fill-in))))