diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2012-12-19 11:43:40 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2012-12-19 11:43:40 (GMT) |
| commit | c164d719c23ebe8d20d8420dc2345163a36878eb (patch) | |
| tree | acb9b00e796181e99a10ffb0d8552cf7318e5a33 /generic/tclIO.c | |
| parent | 35047bd5e543d9e0eaa9ca52914e21104d556f25 (diff) | |
| parent | ee58f2d325a281f03cf6669e8d7ae2c377a5af2d (diff) | |
| download | tcl-c164d719c23ebe8d20d8420dc2345163a36878eb.zip tcl-c164d719c23ebe8d20d8420dc2345163a36878eb.tar.gz tcl-c164d719c23ebe8d20d8420dc2345163a36878eb.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); } |