summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorChris Wilson <chris+github@qwirx.com>2009-09-21 23:34:54 +0000
committerChris Wilson <chris+github@qwirx.com>2009-09-21 23:34:54 +0000
commitb2ffc56814a6e798f6d6618945fa5efb61ff3261 (patch)
treebffd02b52471bbb4e342165dd80dee9048a38396
parent63d00d2baceaf2349f9e8d12ef99861acdd0c332 (diff)
Check that source and text file copies are successful.
Fix missing docs/common in common manifest.
-rw-r--r--distribution/COMMON-MANIFEST.txt1
-rwxr-xr-xinfrastructure/makedistribution.pl.in8
2 files changed, 5 insertions, 4 deletions
diff --git a/distribution/COMMON-MANIFEST.txt b/distribution/COMMON-MANIFEST.txt
index 34c3cffa..a21abe20 100644
--- a/distribution/COMMON-MANIFEST.txt
+++ b/distribution/COMMON-MANIFEST.txt
@@ -13,6 +13,7 @@ test/crypto
test/compress
test/win32
docs/api-notes
+docs/api-notes/common
docs/api-notes/common/lib_common.txt
docs/api-notes/common/lib_crypto
docs/api-notes/common/lib_server
diff --git a/infrastructure/makedistribution.pl.in b/infrastructure/makedistribution.pl.in
index 3914780a..e7789a3e 100755
--- a/infrastructure/makedistribution.pl.in
+++ b/infrastructure/makedistribution.pl.in
@@ -202,8 +202,8 @@ sub copy_file
# print "source copy $fn to $base_name/$dst_fn\n";
my $in = gensym;
- open $in,$fn;
- open OUT,">$base_name/$dst_fn";
+ open $in,$fn or die "$fn: $!";
+ open OUT,">$base_name/$dst_fn" or die "$base_name/$dst_fn: $!";
my $first = <$in>;
if($first =~ m/\A#!/)
@@ -241,8 +241,8 @@ sub copy_file
# print "text copy $fn to $base_name/$dst_fn\n";
my $in = gensym;
- open $in,$fn;
- open OUT,">$base_name/$dst_fn";
+ open $in,$fn or die "$fn: $!";
+ open OUT,">$base_name/$dst_fn" or die "$base_name/$dst_fn: $!";
while(<$in>)
{