summaryrefslogtreecommitdiff
path: root/lisp/rect.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2014-07-08 22:20:21 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2014-07-08 22:20:21 -0400
commit388b22deb41bd53d9294c0e4dcfb6af286252884 (patch)
treee65bbefa059c4999be1fc67c95156cc76098a877 /lisp/rect.el
parent5613a6f6d52bca0018c5777aba67a99f51016a35 (diff)
downloademacs-388b22deb41bd53d9294c0e4dcfb6af286252884.tar.gz
* lisp/rect.el (apply-on-rectangle): Check forward-line really moved to the
next line.
Diffstat (limited to 'lisp/rect.el')
-rw-r--r--lisp/rect.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/rect.el b/lisp/rect.el
index a2f8e4f6371..4c3aa08d7bd 100644
--- a/lisp/rect.el
+++ b/lisp/rect.el
@@ -163,7 +163,7 @@ The final point after the last operation will be returned."
(progn
(apply function startcol endcol args)
(setq final-point (point))
- (and (zerop (forward-line 1))
+ (and (zerop (forward-line 1)) (bolp)
(<= (point) endpt))))
final-point)))