branch: externals/tempel commit 774aebc5aa148d911cb28b42a19c4f8578e7074f Author: Daniel Mendler <m...@daniel-mendler.de> Commit: Daniel Mendler <m...@daniel-mendler.de>
Rename variable --- tempel.el | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/tempel.el b/tempel.el index aeab4f77b7..4c2148a5df 100644 --- a/tempel.el +++ b/tempel.el @@ -398,16 +398,16 @@ If a field was added, return it." (setf (overlay-end ov) (point))))) ;; Activate template (let ((st (cons nil nil)) - (range (point)) + (ov (point)) (tempel--inhibit-hooks t)) (while (and template (not (keywordp (car template)))) (tempel--element st region (pop template))) - (setq range (make-overlay range (point) nil t)) - (push range (car st)) - (overlay-put range 'modification-hooks (list #'tempel--range-modified)) - (overlay-put range 'tempel--range st) - (overlay-put range 'tempel--post (plist-get plist :post)) - ;;(overlay-put range 'face 'region) ;; TODO debug + (setq ov (make-overlay ov (point) nil t)) + (push ov (car st)) + (overlay-put ov 'modification-hooks (list #'tempel--range-modified)) + (overlay-put ov 'tempel--range st) + (overlay-put ov 'tempel--post (plist-get plist :post)) + ;;(overlay-put ov 'face 'region) ;; TODO debug (push st tempel--active))) (cond ((cl-loop for ov in (caar tempel--active)