author | Sergey Poznyakoff <gray@gnu.org> | 2015-09-27 05:04:33 (GMT) |
---|---|---|
committer | Sergey Poznyakoff <gray@gnu.org> | 2015-09-27 05:04:33 (GMT) |
commit | 7ba60f1e59378fc697f9b60eb3cbbe88d8c7f058 (patch) (side-by-side diff) | |
tree | 6f9d31ee71f4afb59920b85e27bfb182be9c31ba | |
parent | e6e8ba0bb7f238ed622f62d67413f25992064ec9 (diff) | |
download | netsnmp-sendmail-7ba60f1e59378fc697f9b60eb3cbbe88d8c7f058.tar.gz netsnmp-sendmail-7ba60f1e59378fc697f9b60eb3cbbe88d8c7f058.tar.bz2 |
Minor fix.
* Sendmail.mib2c: Use printflush to output initial warning
-rw-r--r-- | Sendmail.mib2c | 3 |
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); |