diff options
| author | donal.k.fellows@manchester.ac.uk <dkf> | 2012-12-19 11:43:40 (GMT) |
|---|---|---|
| committer | donal.k.fellows@manchester.ac.uk <dkf> | 2012-12-19 11:43:40 (GMT) |
| commit | bc87bbb4d9b94ea5b2716adde55d18f632b82768 (patch) | |
| tree | acb9b00e796181e99a10ffb0d8552cf7318e5a33 /generic/tclIO.c | |
| parent | 3e55ef9d38f9ad0ce68ab947b51a37b144046100 (diff) | |
| parent | 52f5b9733f350a2667c73be72e0add3225bf327c (diff) | |
| download | tcl-bc87bbb4d9b94ea5b2716adde55d18f632b82768.zip tcl-bc87bbb4d9b94ea5b2716adde55d18f632b82768.tar.gz tcl-bc87bbb4d9b94ea5b2716adde55d18f632b82768.tar.bz2 | |
merge main dev branch
Diffstat (limited to 'generic/tclIO.c')
| -rw-r--r-- | generic/tclIO.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclIO.c b/generic/tclIO.c index 0cb9fa9..715c1ef 100644 --- a/generic/tclIO.c +++ b/generic/tclIO.c @@ -2472,7 +2472,7 @@ FlushChannel( * it's a tty channel (dup'ed underneath) */ - if (!GotFlag(statePtr, BG_FLUSH_SCHEDULED)) { + if (!GotFlag(statePtr, BG_FLUSH_SCHEDULED) && !TclInExit()) { SetFlag(statePtr, BG_FLUSH_SCHEDULED); UpdateInterest(chanPtr); } |