Mercurial > hg > xemacs-beta

comparison lisp/simple.el @ 5473:ac37a5f7e5be

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge with trunk.
author Mats Lidell <matsl@xemacs.org>
date Thu, 17 Mar 2011 23:42:59 +0100
parents 6506fcb40fcf ed74d2ca7082
children 3bc58dc9d688
comparison
equal deleted inserted replaced
5472:e79980ee5efe 5473:ac37a5f7e5be
3977 ;; default-mouse-track-next-move-rect out of mouse.el so that we 3977 ;; default-mouse-track-next-move-rect out of mouse.el so that we
3978 ;; can use its logic here. 3978 ;; can use its logic here.
3979 (cond 3979 (cond
3980 (zmacs-region-rectangular-p 3980 (zmacs-region-rectangular-p
3981 (setq zmacs-region-extent (list zmacs-region-extent)) 3981 (setq zmacs-region-extent (list zmacs-region-extent))
3982 (when-fboundp #'default-mouse-track-next-move-rect 3982 (when-fboundp 'default-mouse-track-next-move-rect
3983 (default-mouse-track-next-move-rect start end zmacs-region-extent)) 3983 (default-mouse-track-next-move-rect start end zmacs-region-extent))
3984 )) 3984 ))
3985 3985
3986 zmacs-region-extent))) 3986 zmacs-region-extent)))
3987 3987