gamelist.pl: better guess for sourcefile

finalburnneo · Nov 11, 2023 · 37e23e3 · 37e23e3
1 parent ee16a01
commit 37e23e3
Showing 1 changed file with 6 additions and 4 deletions.
diff --git a/src/dep/scripts/gamelist.pl b/src/dep/scripts/gamelist.pl
@@ -147,10 +147,12 @@
 				$Drivers{$name}[8] = "";
 			}
 
-			my $sourcefile = $filename;
-			$sourcefile =~ s/..\/..\/burn\/drv\///;	# libretro only ?
-			$sourcefile =~ s/src\/burn\/drv\///;	# all other builds ?
-			$Drivers{$name}[9] = $sourcefile;		# Filename
+			my @parts = split /\//, $filename;
+			my $size_of_parts = @parts;
+			my $sourcefile = "$parts[$size_of_parts-2]/$parts[$size_of_parts-1]";
+			# we still want to remove burn/ from burn/d_parent.cpp
+			$sourcefile =~ s/drv\///;
+			$Drivers{$name}[9] = $sourcefile;				# Filename
 
 			# Convert NULL/null/0 to empty string or remove quotes
 			foreach $line ( @{$Drivers{$name}} ) {