yatex
changeset 344:bfd7a5998555 dev
Give argument for \include without `.tex' extension.
author | HIROSE Yuuji <yuuji@gentei.org> |
---|---|
date | Thu, 18 Dec 2014 23:00:08 +0900 |
parents | 43fb2bf403e4 |
children | 82ca1d4a994d |
files | yatex23.el |
diffstat | 1 files changed, 3 insertions(+), 4 deletions(-) [+] |
line diff
1.1 --- a/yatex23.el Thu Dec 18 22:55:48 2014 +0900 1.2 +++ b/yatex23.el Thu Dec 18 23:00:08 2014 +0900 1.3 @@ -1,6 +1,6 @@ 1.4 ;;; yatex23.el --- YaTeX facilities for Emacs 23 or later -*- coding: sjis -*- 1.5 ;;; (c)2014 by HIROSE Yuuji.[yuuji@yatex.org] 1.6 -;;; Last modified Thu Dec 18 18:26:55 2014 on firestorm 1.7 +;;; Last modified Thu Dec 18 22:59:02 2014 on firestorm 1.8 ;;; $Id:$ 1.9 1.10 ;;; Code: 1.11 @@ -73,9 +73,8 @@ 1.12 ) 1.13 (set-marker envstart nil) ;;sure to reset marker 1.14 action)) 1.15 - ((string-match "\\.tex$" path) 1.16 - (insert "\\include{" path "}")) 1.17 - )) 1.18 + ((string-match "\\(.*\\)\\.tex$" path) 1.19 + (insert "\\include{" (match-string 1 path) "}")))) 1.20 (t (message "%s" action))))) 1.21 1.22 (provide 'yatex23)