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,