[Emacs-diffs] trunk r117500: * lisp/rect.el (apply-on-rectangle): Check forward-line really moved to the

[Stefan Monnier]

------------------------------------------------------------
revno: 117500
revision-id: address@hidden
parent: address@hidden
committer: Stefan Monnier <address@hidden>
branch nick: trunk
timestamp: Tue 2014-07-08 22:20:21 -0400
message:
  * lisp/rect.el (apply-on-rectangle): Check forward-line really moved to the
  next line.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/rect.el                   rect.el-20091113204419-o5vbwnq5f7feedwu-83

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2014-07-09 02:04:12 +0000
+++ b/lisp/ChangeLog    2014-07-09 02:20:21 +0000
@@ -1,5 +1,10 @@
 2014-07-09  Stefan Monnier  <address@hidden>
 
+       * rect.el (apply-on-rectangle): Check forward-line really moved to the
+       next line.
+
+2014-07-09  Stefan Monnier  <address@hidden>
+
        * progmodes/sh-script.el (sh-smie-sh-rules): Don't align with a && in
        the middle of a line (bug#17896).
 

=== modified file 'lisp/rect.el'
--- a/lisp/rect.el      2014-07-03 22:22:42 +0000
+++ b/lisp/rect.el      2014-07-09 02:20:21 +0000
@@ -163,7 +163,7 @@
           (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)))