changeset 323:d08c824ababe dev

resolved
author HIROSE Yuuji <yuuji@gentei.org>
date Sun, 06 Jul 2014 23:28:16 +0900
parents c456fd55013e (diff) 1bbc6cff5b6c (current diff)
children b6500fb81ee0
files yatex.el yatexadd.el
diffstat 2 files changed, 6 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/yatex.el	Tue Jun 03 09:40:32 2014 +0900
+++ b/yatex.el	Sun Jul 06 23:28:16 2014 +0900
@@ -1,6 +1,6 @@
 ;;; yatex.el --- Yet Another tex-mode for emacs //–ì’¹// -*- coding: sjis -*-
 ;;; (c)1991-2014 by HIROSE Yuuji.[yuuji@yatex.org]
-;;; Last modified Thu Apr 24 22:47:19 2014 on firestorm
+;;; Last modified Sun Jul  6 13:25:42 2014 on firestorm
 ;;; $Id$
 ;;; The latest version of this software is always available at;
 ;;; http://www.yatex.org/
@@ -1913,6 +1913,7 @@
   '(("tgif" . ".obj")
     ("gimp" . ".xcf") ("gimp" . ".xcf.gz") ("gimp" . ".xcf.bz2")
     ("inkscape" . ".svg") ("inkscape" . ".svgz") ("inkscape" . ".ai")
+    ("dia" . ".dia")
     ("soffice" . ".odg")
     ("gimp" . ".jpeg") ("gimp" . ".jpg") ("gimp" . ".png")
     ("evince" . ".ps")
--- a/yatexadd.el	Tue Jun 03 09:40:32 2014 +0900
+++ b/yatexadd.el	Sun Jul 06 23:28:16 2014 +0900
@@ -1,7 +1,7 @@
 ;;; yatexadd.el --- YaTeX add-in functions
 ;;; yatexadd.el rev.20
 ;;; (c)1991-2014 by HIROSE Yuuji.[yuuji@yatex.org]
-;;; Last modified Wed Jan  8 07:50:08 2014 on firestorm
+;;; Last modified Sun Jul  6 13:59:09 2014 on firestorm
 ;;; $Id$
 
 ;;; Code:
@@ -1709,7 +1709,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