- Timestamp:
- 03/07/06 16:04:54 (19 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/debbuild
r48 r49 330 330 my $subname = "main"; 331 331 if ($1) { 332 if (/-n/) { $subname = $1; } else { $subname = "$pkgdata{main}{name}-$1"; } 332 my $tmp = $1; 333 if (/-n/) { $subname = $tmp; } else { $subname = "$pkgdata{main}{name}-$tmp"; } 333 334 } 334 335 while (<SPECFILE>) { … … 339 340 } 340 341 if (/^\%package\s+(?:-n\s+)?([a-zA-Z0-9_.-]+)/) { 341 my $subname ;342 if ( /-n/) { $subname = $1; } else{ $subname = "$pkgdata{main}{name}-$1"; }342 my $subname = $1; 343 if (! /-n/) { $subname = "$pkgdata{main}{name}-$1"; } 343 344 push @pkglist, $subname; 344 345 $pkgdata{$subname}{name} = $subname; … … 459 460 my $pkgname = 'main'; 460 461 if ($1) { # Magic to add entries to the right list of files 461 if (/-n/) { $pkgname = $1; } else { $pkgname = "$pkgdata{main}{name}-$1"; } 462 my $tmp = $1; 463 if (/-n/) { $pkgname = $tmp; } else { $pkgname = "$pkgdata{main}{name}-$tmp"; } 462 464 } 463 465
Note:
See TracChangeset
for help on using the changeset viewer.