c2man: Remove a possible path from the spec file name.

This commit is contained in:
Alexandre Julliard 2014-03-10 11:15:04 +01:00
parent 727ff27907
commit 4c062b3702
1 changed files with 3 additions and 2 deletions

View File

@ -99,13 +99,14 @@ sub process_extra_comment($);
sub process_spec_file($) sub process_spec_file($)
{ {
my $spec_name = shift; my $spec_name = shift;
my ($dll_name, $dll_ext) = split(/\./, $spec_name); (my $basename = $spec_name) =~ s/.*\///;
my ($dll_name, $dll_ext) = split(/\./, $basename);
$dll_ext = "dll" if ( $dll_ext eq "spec" ); $dll_ext = "dll" if ( $dll_ext eq "spec" );
my $uc_dll_name = uc $dll_name; my $uc_dll_name = uc $dll_name;
my $spec_details = my $spec_details =
{ {
NAME => $spec_name, NAME => $basename,
DLL_NAME => $dll_name, DLL_NAME => $dll_name,
DLL_EXT => $dll_ext, DLL_EXT => $dll_ext,
NUM_EXPORTS => 0, NUM_EXPORTS => 0,