Mercurial > emacs

diff src/ccl.c @ 80311:23dc6fc4bf91

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(ccl_driver): If ccl->quit_silently is nonzero, don't append "CCL: Quitted" when the CCL program is quitted. (setup_ccl_program): Initialize ccl->quit_silently to zero.
author Kenichi Handa <handa@m17n.org>
date Mon, 10 Mar 2008 12:18:02 +0000
parents 88528794e364
children 4e76a03232e5
line wrap: on
line diff
--- a/src/ccl.c	Mon Mar 10 12:16:47 2008 +0000
+++ b/src/ccl.c	Mon Mar 10 12:18:02 2008 +0000
@@ -1909,7 +1909,8 @@
 	  break;
 
 	case CCL_STAT_QUIT:
-	  sprintf(msg, "\nCCL: Quited.");
+	  if (! ccl->quit_silently)
+	    sprintf(msg, "\nCCL: Quited.");
 	  break;
 
 	default:
@@ -2112,6 +2113,7 @@
   ccl->eol_type = CODING_EOL_LF;
   ccl->suppress_error = 0;
   ccl->eight_bit_control = 0;
+  ccl->quit_silently = 0;
   return 0;
 }