# HG changeset patch
# User HIROSE Yuuji <yuuji@gentei.org>
# Date 1420366619 -32400
# Node ID 9452537530ac198c6ce03d8da220aa59708335c8
# Parent  81413ee9c32da7a0bdf80965bc10f1fc48224255
Process exit status handler fixed

diff -r 81413ee9c32d -r 9452537530ac yatexprc.el
--- a/yatexprc.el	Sun Jan 04 19:05:28 2015 +0900
+++ b/yatexprc.el	Sun Jan 04 19:16:59 2015 +0900
@@ -1,7 +1,7 @@
 ;;; yatexprc.el --- YaTeX process handler
 ;;; 
 ;;; (c)1993-2014 by HIROSE Yuuji.[yuuji@yatex.org]
-;;; Last modified Sun Jan  4 19:00:38 2015 on firestorm
+;;; Last modified Sun Jan  4 19:11:36 2015 on firestorm
 ;;; $Id$
 
 ;;; Code:
@@ -299,11 +299,11 @@
 		      'YaTeX-typeset-sentinel))
 		    (t 
 		     (if (equal 0 (process-exit-status proc))
-			 ;;Confirm process buffer to be shown when error
-			 (progn
-			   (YaTeX-showup-buffer
-			    pbuf 'YaTeX-showup-buffer-bottom-most)
-			   (message "Command FAILED!")))
+			 nil		;do nothing at successful exit
+		       ;;Confirm process buffer to be shown when error
+		       (YaTeX-showup-buffer
+			pbuf 'YaTeX-showup-buffer-bottom-most)
+		       (message "Command FAILED!"))
 		     ;;pull back original mode-name
 		     (setq mode-name "typeset"))))
 		 (forward-char 1))