follow-modokiを仮想windowとして
使う場合。
■具体的な変更点
follow-modokiで、横に長い画面を縦に区切って、仮想的に縦長の一画面として使う場合。Windowがずれてしまう問題を直した。
;"2つのウィンドウを、 1つの『仮想ウィンドウ』としてスクロールする"ために ;画面のずれを修正するようの関数。 ;1ページずらした場合に戻す機能 (defun re-follow() (interactive) (unless (minibuffer-window-p (selected-window)) ; Windowの始めの行ををチェックcurrent-window-start-line (let ((cwsl (get-window-start-line (selected-window))) (owsl (get-window-start-line (next-window (selected-window)))) (tmp 1)) (while (/= owsl (+ cwsl (window-height))) (when (> owsl (+ cwsl (window-height))) (setq tmp -1)) (scroll-up-other-window tmp) (setq owsl (get-window-start-line (next-window (selected-window))))) )))
これで、ずれたら修正できるかもしれない。Windowが二つない場合はエラーになるけど。