# HG changeset patch
# User yuuji@gentei.org
# Date 1285575051 -32400
# Node ID 70b8cd70950ab4d20f68a9eee0d4c4b93e422186
# Parent  f9d3c2451d19bc689566de05adc1d6d059fa5ad3# Parent  78803eda24b85b2df8de4a374bf022eafbb2b7c3
merged

diff -r f9d3c2451d19 -r 70b8cd70950a yatexprc.el
--- a/yatexprc.el	Mon Sep 27 17:07:16 2010 +0900
+++ b/yatexprc.el	Mon Sep 27 17:10:51 2010 +0900
@@ -2,7 +2,7 @@
 ;;; YaTeX process handler.
 ;;; yatexprc.el
 ;;; (c)1993-2010 by HIROSE Yuuji.[yuuji@yatex.org]
-;;; Last modified Fri Sep 10 17:47:38 2010 on firestorm
+;;; Last modified Mon Sep 27 17:07:41 2010 on duke
 ;;; $Id$
 
 ;(require 'yatex)
@@ -308,9 +308,8 @@
 	(cb (current-buffer)))
     (and pp
 	 (stringp pp)
-	 (let ((tex-command pp))
-	   (setq ppcmd (YaTeX-get-latex-command t)
-		 ppcmd (substring ppcmd 0 (rindex ppcmd ?.)))))
+	 (setq ppcmd (concat pp (substring cmd (string-match "[ \t]" cmd)))
+	       ppcmd (substring ppcmd 0 (rindex ppcmd ?.))))
     (if (YaTeX-main-file-p) nil
       (save-excursion
 	(YaTeX-visit-main t)	;search into main buffer