X-Git-Url: https://cgit.sxemacs.org/?p=riece;a=blobdiff_plain;f=lisp%2Friece-misc.el;fp=lisp%2Friece-misc.el;h=2ab9f07385222048f6c931a9bdfb3574f212ab24;hp=d3e19360bf05d9b66c5dfb211ac97b7100842f40;hb=b6697e33d7a0def19a85c874907092d505946333;hpb=3b8a7caa8eb1f6e8cbaea54b7cc139e95f07ee50 diff --git a/lisp/riece-misc.el b/lisp/riece-misc.el index d3e1936..2ab9f07 100644 --- a/lisp/riece-misc.el +++ b/lisp/riece-misc.el @@ -77,10 +77,11 @@ (setq point (point)) (if (and (not (riece-frozen (current-buffer))) (setq window (get-buffer-window (current-buffer)))) - (save-excursion + (save-excursion ;save-selected-window changes + ;current buffer (save-selected-window (select-window window) - (goto-char point) + (goto-char point) ;select-window changes current point (recenter -2)))) (run-hook-with-args 'riece-after-insert-functions start (point)))) (setq buffers (cdr buffers))))