changeset 378:9452537530ac dev

Process exit status handler fixed
author HIROSE Yuuji <yuuji@gentei.org>
date Sun, 04 Jan 2015 19:16:59 +0900
parents 81413ee9c32d
children 09a2b5a3b3d8
files yatexprc.el
diffstat 1 files changed, 6 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- 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))

yatex.org