Author: autrijus
Date: Fri Oct 7 14:53:16 2005
New Revision: 9403
Modified:
trunk/MANIFEST
trunk/tools/dev/install_files.pl
Log:
* tools/dev/install_files.pl: Catch malformed lines in MANIFEST.
Modified: trunk/MANIFEST
==============================================================================
--- trunk/MANIFEST (original)
+++ trunk/MANIFEST Fri Oct 7 14:53:16 2005
@@ -38,7 +38,7 @@ build_tools/list_unjitted.pl
build_tools/ops2c.pl [devel]
build_tools/ops2pm.pl [devel]
build_tools/parrot_config_c.pl []
-build_tools/parrotdef.pl
+build_tools/parrotdef.pl []
build_tools/pbc2c.pl [devel]
build_tools/pmc2c.pl []
build_tools/revision_c.pl [devel]
Modified: trunk/tools/dev/install_files.pl
==============================================================================
--- trunk/tools/dev/install_files.pl (original)
+++ trunk/tools/dev/install_files.pl Fri Oct 7 14:53:16 2005
@@ -159,6 +159,7 @@ while(<>) {
}
# Parse out metadata
+ die "Malformed line in MANIFEST: $_" if not defined $meta;
my $generated = $meta =~ s/^\*//;
my ($package) = $meta =~ /^\[(.*?)\]/;
$meta =~ s/^\[(.*?)\]//;
