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 ()