Mercurial > hgrepos > hgweb.cgi > yatex

changeset 321:f654ef888a4c dev

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Set old file name as default value on read-file-name at \include*
author HIROSE Yuuji <yuuji@gentei.org>
date Sun, 06 Jul 2014 23:19:09 +0900
parents b16e6b1cf00b
children c456fd55013e
files yatexadd.el
diffstat 1 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/yatexadd.el	Sat Nov 23 01:04:05 2013 +0900
+++ b/yatexadd.el	Sun Jul 06 23:19:09 2014 +0900
@@ -1,7 +1,7 @@
 ;;; yatexadd.el --- YaTeX add-in functions
 ;;; yatexadd.el rev.20
 ;;; (c)1991-2013 by HIROSE Yuuji.[yuuji@yatex.org]
-;;; Last modified Thu Nov 21 15:50:56 2013 on firestorm
+;;; Last modified Sun Jul  6 13:59:09 2014 on firestorm
 ;;; $Id$
 
 ;;; Code:
@@ -1708,7 +1708,9 @@
     (save-excursion
       (YaTeX-visit-main t)
       (let*((insert-default-directory)
-	    (file (read-file-name (or prompt "Input file: ") "")))
+	    (default (and (boundp 'old) (stringp old) old))
+	    (file (read-file-name (or prompt "Input file: ") ""
+				  default nil default)))
 	(setq file (substring file 0 (string-match "\\.tex$" file))))))))
 
 (fset 'YaTeX::input 'YaTeX::include)

yatex.org