aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--generic/pg-response.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/generic/pg-response.el b/generic/pg-response.el
index ff5487bb..1e022fdb 100644
--- a/generic/pg-response.el
+++ b/generic/pg-response.el
@@ -419,8 +419,9 @@ and start at the first error."
See `pg-next-error-regexp'."
(if pg-next-error-regexp
(proof-with-current-buffer-if-exists proof-response-buffer
- (goto-char (point-min))
- (re-search-forward pg-next-error-regexp nil t))))
+ (save-excursion
+ (goto-char (point-min))
+ (re-search-forward pg-next-error-regexp nil t)))))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;