]> code.delx.au - gnu-emacs/commitdiff
Don't insert erc logs at the end
authorLars Ingebrigtsen <larsi@gnus.org>
Sun, 27 Dec 2015 20:08:01 +0000 (21:08 +0100)
committerLars Ingebrigtsen <larsi@gnus.org>
Sun, 27 Dec 2015 20:08:01 +0000 (21:08 +0100)
* erc-log.el (erc-log-setup-logging): Insert the previous log
at the start of the buffer, not at the end (bug#20496).

lisp/erc/erc-log.el

index f022284450adea4d3ec5263bb8dd6f493181ef37..4ac13aab0708692e3807c93d3500a5a413abc6f5 100644 (file)
@@ -270,9 +270,12 @@ The current buffer is given by BUFFER."
       (setq buffer-file-name nil)
       (erc-set-write-file-functions '(erc-save-buffer-in-logs))
       (when erc-log-insert-log-on-open
-       (ignore-errors (insert-file-contents (erc-current-logfile))
-                      (move-marker erc-last-saved-position
-                                   (1- (point-max))))))))
+       (ignore-errors
+         (save-excursion
+           (goto-char (point-min))
+           (insert-file-contents (erc-current-logfile)))
+         (move-marker erc-last-saved-position
+                      (1- (point-max))))))))
 
 (defun erc-log-disable-logging (buffer)
   "Disable logging in BUFFER."