From 9b8d7973f7397eb4002d2ace4f3cb4355ef883dc Mon Sep 17 00:00:00 2001 From: Christian Walde Date: Sat, 27 Jul 2019 06:06:39 +0200 Subject: [PATCH] some additional file deletion on unpack --- unpack_original_files.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/unpack_original_files.pl b/unpack_original_files.pl index b07eb2d..d4c161f 100644 --- a/unpack_original_files.pl +++ b/unpack_original_files.pl @@ -30,7 +30,7 @@ sub run { say "has find: $has_find"; my @list = $has_find ? split /\n/, `c:/cygwin/bin/find "." -type f` # : io(".")->All_Files; - @list = grep /\.(gobj|4|dds|fsb|snd|[\d]+|script|txt|shader|ani|obj|cbm|mesh|xml)$/, @list; + @list = grep /\.(gobj|4|dds|fsb|snd|[\d]+|script|txt|shader|ani|obj|cbm|mesh|xml|smd)$/, @list; say "deleting"; my $ctd = countdown->new( total => scalar @list );