Mercurial > emacs

comparison lisp/tempo.el @ 64600:07e5e0169359

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(tempo-insert-template): Fix 2005-07-16 change.
author Juri Linkov <juri@jurta.org>
date Fri, 22 Jul 2005 18:44:45 +0000
parents dc9ffd263776
children 41bb365f41c4 890cc78a5a24
comparison
equal deleted inserted replaced
64599:8855370e6a88 64600:07e5e0169359
301 (progn 301 (progn
302 (if (or (and (boundp 'transient-mark-mode) ; For Emacs 302 (if (or (and (boundp 'transient-mark-mode) ; For Emacs
303 transient-mark-mode 303 transient-mark-mode
304 mark-active) 304 mark-active)
305 (if (featurep 'xemacs) 305 (if (featurep 'xemacs)
306 zmacs-regions (mark))) 306 (and zmacs-regions (mark))))
307 (setq on-region t)) 307 (setq on-region t))
308 (and on-region 308 (and on-region
309 (set-marker tempo-region-start (min (mark) (point))) 309 (set-marker tempo-region-start (min (mark) (point)))
310 (set-marker tempo-region-stop (max (mark) (point)))) 310 (set-marker tempo-region-stop (max (mark) (point))))
311 (if on-region 311 (if on-region