[Emacs-diffs] trunk r114700: * lisp/indent.el (indent-rigidly): Fix 2013-10-08 change.

[Glenn Morris]

------------------------------------------------------------
revno: 114700
revision-id: address@hidden
parent: address@hidden
fixes bug: http://debbugs.gnu.org/15635
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Thu 2013-10-17 15:31:11 -0400
message:
  * lisp/indent.el (indent-rigidly): Fix 2013-10-08 change.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/indent.el                 indent.el-20091113204419-o5vbwnq5f7feedwu-230

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-10-17 04:51:05 +0000
+++ b/lisp/ChangeLog    2013-10-17 19:31:11 +0000
@@ -1,3 +1,7 @@
+2013-10-17  Glenn Morris  <address@hidden>
+
+       * indent.el (indent-rigidly): Fix 2013-10-08 change.  (Bug#15635)
+
 2013-10-17  Stefan Monnier  <address@hidden>
 
        * skeleton.el (skeleton-newline): Remove.

=== modified file 'lisp/indent.el'
--- a/lisp/indent.el    2013-10-08 06:17:49 +0000
+++ b/lisp/indent.el    2013-10-17 19:31:11 +0000
@@ -212,7 +212,7 @@
             (skip-chars-forward " \t")
             (setq eol-flag (eolp)))
           (or eol-flag
-              (indent-to (max 0 (+ indent arg)) 0))
+              (indent-to (max 0 (+ indent (prefix-numeric-value arg))) 0))
           (delete-region (point) (progn (skip-chars-forward " \t") (point))))
         (forward-line 1))
       (move-marker end nil))))