- Timestamp:
- 06/05/06 17:32:52 (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/debbuild
r61 r62 375 375 } 376 376 377 if (/^\%description(?:\s+(?:-n\s+)?( [a-zA-Z0-9_.-]+))?/) {377 if (/^\%description(?:\s+(?:-n\s+)?(.+))?/) { 378 378 my $subname = "main"; 379 379 if ($1) { 380 my $tmp = $1;380 my $tmp = expandmacros("$1", 'g'); 381 381 if (/-n/) { $subname = $tmp; } else { $subname = "$pkgdata{main}{name}-$tmp"; } 382 382 } … … 387 387 } 388 388 } 389 if (/^\%package\s+(?:-n\s+)?([a-zA-Z0-9_.-]+)/) { 390 my $subname = $1; 389 if (/^\%package\s+(?:-n\s+)?(.+)/) { 390 # gotta expand %defines here. Whee. 391 my $subname = expandmacros("$1", 'g'); 391 392 if (! /-n/) { $subname = "$pkgdata{main}{name}-$1"; } 392 393 push @pkglist, $subname; … … 397 398 if (my ($dname,$dvalue) = (/^(Summary|Group|Version|Requires|Provides):\s+(.+)$/i)) { 398 399 $dname =~ tr/[A-Z]/[a-z]/; 399 $pkgdata{$subname}{$dname} = $dvalue;400 $pkgdata{$subname}{$dname} = expandmacros($dvalue, 'g'); 400 401 } 401 402 } … … 505 506 # done %pre/%post scripts 506 507 507 if (/^\%files(?:\s+(?:-n\s+)?( [a-zA-z0-9.-]+))?/) {508 if (/^\%files(?:\s+(?:-n\s+)?(.+))?/) { 508 509 my $pkgname = 'main'; 509 510 if ($1) { # Magic to add entries to the right list of files 510 my $tmp = $1;511 my $tmp = expandmacros("$1", 'g'); 511 512 if (/-n/) { $pkgname = $tmp; } else { $pkgname = "$pkgdata{main}{name}-$tmp"; } 512 513 } … … 606 607 $buildreq .= ", $1"; 607 608 } elsif (/^requires:\s+(.+)/i) { 608 $pkgdata{main}{requires} .= ", $1";609 $pkgdata{main}{requires} .= ", ".expandmacros("$1", 'g'); 609 610 } elsif (/^provides:\s+(.+)/i) { 610 611 $pkgdata{main}{provides} .= ", $1";
Note:
See TracChangeset
for help on using the changeset viewer.