summaryrefslogtreecommitdiff
path: root/lisp/rect.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1994-11-09 22:54:15 +0000
committerRichard M. Stallman <rms@gnu.org>1994-11-09 22:54:15 +0000
commitb6c1b08c69d41861908c5a24b622837331a0f6d7 (patch)
treefa4183ada2f1f3175e46080d5e958550df788d5c /lisp/rect.el
parenta382890aab9a7f56217ed62f47ad70f074cf0003 (diff)
downloademacs-b6c1b08c69d41861908c5a24b622837331a0f6d7.tar.gz
(string-rectangle): Don't set point.
Diffstat (limited to 'lisp/rect.el')
-rw-r--r--lisp/rect.el3
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/rect.el b/lisp/rect.el
index 71e1f8ed1e7..3864934cfd6 100644
--- a/lisp/rect.el
+++ b/lisp/rect.el
@@ -204,8 +204,7 @@ This command does not delete or overwrite any existing text.
Called from a program, takes three args; START, END and STRING."
(interactive "r\nsString rectangle: ")
- (operate-on-rectangle 'string-rectangle-line start end t)
- (goto-char start))
+ (operate-on-rectangle 'string-rectangle-line start end t))
(defun string-rectangle-line (startpos begextra endextra)
(let (whitespace)