summaryrefslogtreecommitdiffabout
authorSergey Poznyakoff <gray@gnu.org>2015-09-27 05:04:33 (GMT)
committer Sergey Poznyakoff <gray@gnu.org>2015-09-27 05:04:33 (GMT)
commit7ba60f1e59378fc697f9b60eb3cbbe88d8c7f058 (patch) (side-by-side diff)
tree6f9d31ee71f4afb59920b85e27bfb182be9c31ba
parente6e8ba0bb7f238ed622f62d67413f25992064ec9 (diff)
downloadnetsnmp-sendmail-7ba60f1e59378fc697f9b60eb3cbbe88d8c7f058.tar.gz
netsnmp-sendmail-7ba60f1e59378fc697f9b60eb3cbbe88d8c7f058.tar.bz2
Minor fix.
* Sendmail.mib2c: Use printflush to output initial warning
Diffstat (more/less context) (ignore whitespace changes)
-rw-r--r--Sendmail.mib2c3
1 files changed, 2 insertions, 1 deletions
diff --git a/Sendmail.mib2c b/Sendmail.mib2c
index db43f43..05f60b6 100644
--- a/Sendmail.mib2c
+++ b/Sendmail.mib2c
@@ -101,13 +101,14 @@ registerAgent($@agent, '$rootoid', $@oidtable);
@close ${tempfile}@
@startperl@
use File::Copy;
+use IO::Handle;
use autodie;
print "creating $vars{name}\n";
open(FILE, '>', $vars{name});
-print FILE "# THIS FILE IS GENERATED AUTOMATICALLY. PLEASE DO NOT EDIT.\n";
+printflush FILE "# THIS FILE IS GENERATED AUTOMATICALLY. PLEASE DO NOT EDIT.\n";
copy($vars{prologue}, \*FILE) if defined $vars{prologue};
copy($vars{tempfile}, \*FILE);

Return to:

Send suggestions and report system problems to the System administrator.