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 wrap: on
line diff
--- a/yatex23.el	Thu Dec 18 22:55:48 2014 +0900
+++ b/yatex23.el	Thu Dec 18 23:00:08 2014 +0900
@@ -1,6 +1,6 @@
 ;;; yatex23.el --- YaTeX facilities for Emacs 23 or later -*- coding: sjis -*-
 ;;; (c)2014 by HIROSE Yuuji.[yuuji@yatex.org]
-;;; Last modified Thu Dec 18 18:26:55 2014 on firestorm
+;;; Last modified Thu Dec 18 22:59:02 2014 on firestorm
 ;;; $Id:$
 
 ;;; Code:
@@ -73,9 +73,8 @@
 	      )
 	  (set-marker envstart nil) ;;sure to reset marker
 	  action))
-       ((string-match "\\.tex$" path)
-	(insert "\\include{" path "}"))
-       ))
+       ((string-match "\\(.*\\)\\.tex$" path)
+	(insert "\\include{" (match-string 1 path) "}"))))
      (t (message "%s" action)))))
 
 (provide 'yatex23)

yatex.org