yatex
changeset 532:5eb2b1d824f3 dev
Emacs26's switch-to-buffer does not keep logical point.
So we need to use set-window-buffer to bring current but non-interactive
buffer up to interactive buffer.
author | HIROSE Yuuji <yuuji@gentei.org> |
---|---|
date | Wed, 30 May 2018 13:54:46 +0900 |
parents | 6ea85aaae6f2 |
children | 81af9784a013 |
files | yatexadd.el yatexsec.el |
diffstat | 2 files changed, 4 insertions(+), 3 deletions(-) [+] |
line diff
1.1 --- a/yatexadd.el Wed May 30 08:33:07 2018 +0900 1.2 +++ b/yatexadd.el Wed May 30 13:54:46 2018 +0900 1.3 @@ -1,6 +1,6 @@ 1.4 ;;; yatexadd.el --- YaTeX add-in functions -*- coding: sjis -*- 1.5 ;;; (c)1991-2018 by HIROSE Yuuji.[yuuji@yatex.org] 1.6 -;;; Last modified Wed May 16 22:41:56 2018 on firestorm 1.7 +;;; Last modified Wed May 30 13:35:42 2018 on firestorm 1.8 ;;; $Id$ 1.9 1.10 ;;; Code: 1.11 @@ -1296,7 +1296,7 @@ 1.12 (overlay-put 1.13 (setq ov (make-overlay b e)) 1.14 'face repface))) 1.15 - (switch-to-buffer buf) 1.16 + (set-window-buffer nil buf) ;Emacs26 1.17 (while t 1.18 (message qmsg new) 1.19 (setq ch (read-char))
2.1 --- a/yatexsec.el Wed May 30 08:33:07 2018 +0900 2.2 +++ b/yatexsec.el Wed May 30 13:54:46 2018 +0900 2.3 @@ -1,7 +1,7 @@ 2.4 ;;; yatexsec.el --- YaTeX sectioning browser 2.5 ;;; 2.6 ;;; (c) 1994-2017 by HIROSE Yuuji [yuuji@yatex.org] 2.7 -;;; Last modified Sun Dec 21 14:16:35 2014 on firestorm 2.8 +;;; Last modified Wed May 30 13:29:50 2018 on firestorm 2.9 ;;; $Id$ 2.10 2.11 ;;; Code: 2.12 @@ -192,6 +192,7 @@ 2.13 (other-window 1) 2.14 (setq sb (current-buffer)) 2.15 (switch-to-buffer hb) 2.16 + (setq buffer-read-only nil) ;; Emacs26 2.17 (erase-buffer) 2.18 (insert "===== View sectioning ===== 2.19 C-p Up sectioning level. 0 Show only \\part,