Commit 02399da7 authored by Stefan Monnier's avatar Stefan Monnier
Browse files

(skeleton-internal-1): Always push the mark for @.

parent 0be90892
2001-02-04 Stefan Monnier <monnier@cs.yale.edu>
* skeleton.el (skeleton-internal-1): Always push the mark for @.
2001-02-02 Eli Zaretskii <eliz@is.elta.co.il>
 
* info.el (info-initialize): If installation-directory is nil, for
......
......@@ -451,9 +451,8 @@ automatically, and you are prompted to fill in the variable parts.")))
(or skeleton-modified
(setq skeleton (cdr skeleton))))
((eq element '@)
(if skeleton-point
(push (point) skeleton-positions)
(setq skeleton-point (point))))
(push (point) skeleton-positions)
(unless skeleton-point (setq skeleton-point (point))))
((eq 'quote (car-safe element))
(eval (nth 1 element)))
((or (stringp (car-safe element))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment