aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorKenichi Handa2008-03-10 12:18:02 +0000
committerKenichi Handa2008-03-10 12:18:02 +0000
commit74215b552126a43e4331a7a9c78497ac0ffe2257 (patch)
tree39725f2dd1788bebd60d19a6128918002bb665e1 /src
parent7a1dd8de8f17a4c858d8fb5a34890fc65f33823b (diff)
downloademacs-74215b552126a43e4331a7a9c78497ac0ffe2257.tar.gz
emacs-74215b552126a43e4331a7a9c78497ac0ffe2257.zip
(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.
Diffstat (limited to 'src')
-rw-r--r--src/ccl.c4
1 files changed, 3 insertions, 1 deletions
diff --git a/src/ccl.c b/src/ccl.c
index f0c078228df..19637e01fca 100644
--- a/src/ccl.c
+++ b/src/ccl.c
@@ -1909,7 +1909,8 @@ ccl_driver (ccl, source, destination, src_bytes, dst_bytes, consumed)
1909 break; 1909 break;
1910 1910
1911 case CCL_STAT_QUIT: 1911 case CCL_STAT_QUIT:
1912 sprintf(msg, "\nCCL: Quited."); 1912 if (! ccl->quit_silently)
1913 sprintf(msg, "\nCCL: Quited.");
1913 break; 1914 break;
1914 1915
1915 default: 1916 default:
@@ -2112,6 +2113,7 @@ setup_ccl_program (ccl, ccl_prog)
2112 ccl->eol_type = CODING_EOL_LF; 2113 ccl->eol_type = CODING_EOL_LF;
2113 ccl->suppress_error = 0; 2114 ccl->suppress_error = 0;
2114 ccl->eight_bit_control = 0; 2115 ccl->eight_bit_control = 0;
2116 ccl->quit_silently = 0;
2115 return 0; 2117 return 0;
2116} 2118}
2117 2119