yatex

diff yatexadd.el @ 573:9e07513fc2ef

Do not escape URL when it has triple `%XX's
author HIROSE Yuuji <yuuji@gentei.org>
date Wed, 11 Sep 2019 09:27:10 +0900
parents 7f2e544b9cc9
children 777d17c07759
line diff
     1.1 --- a/yatexadd.el	Tue Feb 26 22:14:56 2019 +0900
     1.2 +++ b/yatexadd.el	Wed Sep 11 09:27:10 2019 +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 Tue Feb 26 22:10:53 2019 on firestorm
     1.7 +;;; (c)1991-2019 by HIROSE Yuuji.[yuuji@yatex.org]
     1.8 +;;; Last modified Sat May 25 14:46:41 2019 on firestorm
     1.9  ;;; $Id$
    1.10  
    1.11  ;;; Code:
    1.12 @@ -22,8 +22,8 @@
    1.13  Notice that this function refers the let-variable `env' in
    1.14  YaTeX-make-begin-end."
    1.15    (let ((width "") bars (rule "") (and "") (j 1) loc ans (hline "\\hline"))
    1.16 -    (if (string= YaTeX-env-name "tabular*")
    1.17 -	(setq width (concat "{" (YaTeX:read-length "Width: ") "}")))
    1.18 +    (if (string-match "tabular[*x]" YaTeX-env-name)
    1.19 +	(setq width (concat "{" (YaTeX:read-length "Table Width: ") "}")))
    1.20      (setq loc (YaTeX:read-position "tb")
    1.21  	  bars (YaTeX-str2int
    1.22  		(YaTeX-read-string-or-skip
    1.23 @@ -57,6 +57,7 @@
    1.24  
    1.25  (fset 'YaTeX:tabular* 'YaTeX:tabular)
    1.26  (fset 'YaTeX:supertabular 'YaTeX:tabular)
    1.27 +(fset 'YaTeX:tabularx 'YaTeX:tabular)
    1.28  (defun YaTeX:alignat ()
    1.29    (concat "{" (read-string-with-history "Number of columns: ") "}"))
    1.30  (defun YaTeX:array ()