From: Richard M. Stallman <rms@gnu.org>
Date: Wed, 9 Nov 1994 22:54:15 +0000 (+0000)
Subject: (string-rectangle): Don't set point.
X-Git-Tag: emacs-19.34~5978
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b6c1b08c69d41861908c5a24b622837331a0f6d7;p=emacs.git

(string-rectangle): Don't set point.
---

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)