(comint-replace-by-expanded-history-before-point): Fix

change of 2000-08-03 to move point to the start of the line again.

lisp/comint.el

@@ -1136,6 +1136,7 @@ than the logical beginning of line."
   (save-excursion
     (let ((toend (- (line-end-position) (point)))
 	  (start (comint-line-beginning-position)))
+      (goto-char start)
       (while (progn
 	       (skip-chars-forward "^!^" (- (line-end-position) toend))
 	       (< (point) (- (line-end-position) toend)))