Attachment 1764 Details for Bug 4632 – perl example how to bump mkrel & add needed requires

perl example how to bump mkrel & add needed requires

add-req.pl (text/plain), 489 bytes, created by Thierry Vignaud on 2012-03-14 11:50:54 CET

(hide)

Description:

Filename:

MIME Type:

Creator: Thierry Vignaud

Created: 2012-03-14 11:50:54 CET

Size: 489 bytes

patch

obsolete

use lib qw(/usr/lib/libDrakX);
use strict;
use MDK::Common;

foreach my $spec (glob("hunspell-*/SPECS/*.spec")) {
	my ($name, $locale) = $spec =~ /(hunspell-(\w+))/;
	warn ">> handling $name [$locale]\n";
	my $found;
	substInFile { 
		if (/\%mkrel (\d+)/) {
			my $rel = $1;
			$rel++;
			s/\%mkrel (\d+)/\%mkrel $rel/;
		}
		if (!$found && /^BuildRequires/i) {
			$found = 1;
			$_ = "Requires: locales-$locale\n" . $_;
		}
	} $spec;
	warn "not done for $name [$locale]\n" if !$found;
}

Actions: View

Attachments on bug 4632: 1762 | 1764