diff options
author | Sean Farley <scf@FreeBSD.org> | 2008-04-30 23:27:02 +0000 |
---|---|---|
committer | Sean Farley <scf@FreeBSD.org> | 2008-04-30 23:27:02 +0000 |
commit | 9b9f22511914abf08370fc5c29bf7ba3bfc5d2ff (patch) | |
tree | dca4dbeadba2c5f8e1f406a795f1829f63c6502e /tools | |
parent | 2182c0cfbf7fd4db2391af55d8335eea1bb3f886 (diff) | |
download | src-9b9f22511914abf08370fc5c29bf7ba3bfc5d2ff.tar.gz src-9b9f22511914abf08370fc5c29bf7ba3bfc5d2ff.zip |
Enable autoflush of output to always show prompts. If piping the output
prior to this patch, the prompt would not appear due to buffering.
Approved by: flz
Notes
Notes:
svn path=/head/; revision=178701
Diffstat (limited to 'tools')
-rw-r--r-- | tools/tools/mfc/mfc.pl | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/tools/tools/mfc/mfc.pl b/tools/tools/mfc/mfc.pl index c86267988275..18138a825a54 100644 --- a/tools/tools/mfc/mfc.pl +++ b/tools/tools/mfc/mfc.pl @@ -51,6 +51,7 @@ use warnings; use Env; use Env qw(MFCHOME MFCLOGIN MFCCVSROOT); use Getopt::Std; +use IO::Handle; my $mfchome = $MFCHOME ? $MFCHOME : "/var/tmp/mfc"; my $mfclogin = $MFCLOGIN ? $MFCLOGIN : ""; @@ -77,6 +78,10 @@ my $mfc_func = \&mfc_headers; sub init() { + # Enable autoflush of output to always show prompts. Without this, + # piping output will fail to display a prompt. + autoflush STDOUT 1; + # Look for pre-requisites. my @reqs = ( "fetch", "cvs", "mkdir", "cat", "chmod", "grep" ); my $cmd; |