Fix incorrect hash size limit

[vlc] / vlc-api.pl

diff --git a/vlc-api.pl b/vlc-api.pl
index dc8056f0eb6a52044f4954cc84ebfd515a57b32a..0cb7d529915d02ed0be342a6ce46a20ae8414a3f 100755 (executable)
--- a/vlc-api.pl
+++ b/vlc-api.pl
@@ -32,19 +32,15 @@ my $srcdir = $ENV{'top_srcdir'};
 #
 my %new_APIs;
 my $new_sym = IO::Handle->new();
-open $new_sym, '> libvlc.sym' or die "libvlc.sym: $!\n";
 
 while (<STDIN>)
 {
        if (/VLC_EXPORT\(\s*(\w.*\S)\s*,\s*(\w*)\s*,\s*\(\s*(\w.*\S)\s*\)\s*\)[^)]*$/)
        {
                $new_APIs{$2} = [ ( $1, $3 ) ];
-               print { $new_sym } "$2\n";
        } 
 }
 
-close $new_sym;
-
 #
 # Write header's header
 #