#* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111, USA.
#*****************************************************************************/
+use IO::Handle;
use strict;
my $srcdir = $ENV{'top_srcdir'};
#
# Write header's header
#
-open my $new_sym, '> vlc_symbols.h.new' or die "$!";
+my $new_sym=IO::Handle->new();
+open $new_sym, '> vlc_symbols.h.new' or die "$!";
print { $new_sym }
"/*\n".
" * This file is automatically generated. DO NOT EDIT!\n".
"/*\n".
" * In an ideal world, plugins would include all the headers they need.\n".
" * But of course, many, if not all, of them don't, so we have to make sure\n".
- " * the while libvlc API is defined here in any case when included from a\n".
+ " * the whole libvlc API is defined here in any case when included from a\n".
" * plugin.\n".
" */\n".
"# ifdef __PLUGIN__\n".
my @deprecated_API;
my $parse = 0;
-open my $oldfd, "< $srcdir/include/vlc_symbols.h";
+my $oldfd = IO::Handle->new();
+open $oldfd, "< $srcdir/include/vlc_symbols.h";
while (<$oldfd>)
{