Kaydet (Commit) df5e8df4 authored tarafından Caolán McNamara's avatar Caolán McNamara

validate and pack .ui files as well as .xml files

üst 506d096e
......@@ -20,7 +20,7 @@ eval 'exec perl -wS $0 ${1+"$@"}'
#
#
#
# check_xml.pl - check xml,xcs,xcu files size, NULL character
# check_xml.pl - check ui,xml,xcs,xcu files size, NULL character
#
my
......@@ -73,7 +73,7 @@ sub check #04.02.2005 13:40
my $path = shift;
my $file = shift;
print "$path$file\n" if ((-e "$path$file") && $is_debug);
return if ( $file !~ /.+\.(xcu|xml|xcs)/ ); #check xml and xcu files only
return if ( $file !~ /.+\.(ui|xcu|xml|xcs)/ ); #check ui, xml and xcu files only
if ( -z "$path$file" ) {
print "Error: $path$file 0 Bytes!\n";
$err++;
......
......@@ -124,7 +124,7 @@ sub wanted
{
my $file = $_;
if ( $file =~ /.*\.xml$/ && -f $file ) {
if ( $file =~ /.*\.(ui|xml)$/ && -f $file ) {
push @main::file_list, $File::Find::name;
}
}
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment