Changeset 2574 for box/trunk/infrastructure
- Timestamp:
- 22/09/2009 00:34:54 (3 years ago)
- File:
-
- 1 edited
-
box/trunk/infrastructure/makedistribution.pl.in (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
box/trunk/infrastructure/makedistribution.pl.in
r2476 r2574 203 203 204 204 my $in = gensym; 205 open $in,$fn ;206 open OUT,">$base_name/$dst_fn" ;205 open $in,$fn or die "$fn: $!"; 206 open OUT,">$base_name/$dst_fn" or die "$base_name/$dst_fn: $!"; 207 207 208 208 my $first = <$in>; … … 242 242 243 243 my $in = gensym; 244 open $in,$fn ;245 open OUT,">$base_name/$dst_fn" ;244 open $in,$fn or die "$fn: $!"; 245 open OUT,">$base_name/$dst_fn" or die "$base_name/$dst_fn: $!"; 246 246 247 247 while(<$in>)
Note: See TracChangeset
for help on using the changeset viewer.
