diff --git a/yatexprc.el b/yatexprc.el
index 067e85f..733d3f5 100644
--- a/yatexprc.el
+++ b/yatexprc.el
@@ -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