[Fedora-security-commits] fedora-security/tools/lib/Libexig Fedora.pm, 1.1.2.2, 1.1.2.3
fedora-security-commits at redhat.com
fedora-security-commits at redhat.com
Thu Jan 10 18:01:26 UTC 2008
Author: lkundrak
Update of /cvs/fedora/fedora-security/tools/lib/Libexig
In directory cvs-int.fedora.redhat.com:/tmp/cvs-serv29915/lib/Libexig
Modified Files:
Tag: lkundrak-tools-ng
Fedora.pm
Log Message:
I gorribly broke a-t-b, fixing now a bit, needs tidyup
Index: Fedora.pm
===================================================================
RCS file: /cvs/fedora/fedora-security/tools/lib/Libexig/Attic/Fedora.pm,v
retrieving revision 1.1.2.2
retrieving revision 1.1.2.3
diff -u -r1.1.2.2 -r1.1.2.3
--- Fedora.pm 9 Jan 2008 21:42:37 -0000 1.1.2.2
+++ Fedora.pm 10 Jan 2008 18:01:24 -0000 1.1.2.3
@@ -204,47 +204,39 @@
my $parent_bugs = shift;
my $tracking_bugs = shift;
my $bugzilla = shift;
+ my $component = shift;
+
+ my $comment = "Created Fedora tracking bugs for $component:\n\n";
foreach my $bug (@{$tracking_bugs}) {
- my $bug_id = $bugzilla->file_bug (\%bug);
+ use Data::Dumper;
+ my $bug_id = $bugzilla->file_bug ($bug);
- if ($bug{'version'} ne 'rawhide') {
+ ### XXX: Move this somewhere else?
+ if ($bug->{'version'} ne 'rawhide') {
my $tr_comment =
'You can eventually use the following link to '.
'create the update request: '."\n".
'https://admin.fedoraproject.org/updates/new/'.
'?request=Stable'.
'&type=security'.
- '&release=Fedora%20'.$bug{'version'}.
+ '&release=Fedora%20'.$bug->{'version'}.
'&bugs='.$bug_id;
- foreach my $bug (@{$bugs}) {
+ foreach my $bug (@{$parent_bugs}) {
$tr_comment .= ','.$bug->{'bug_id'};
}
- # XXX: public
- $bugzilla->add_private_comment ($bug_id, $tr_comment);
+ $bugzilla->add_comment ($bug_id, $tr_comment);
}
- $bugzilla->add_blockers ($bug_id, \@bugs);
- $comment .= $bug{'version'}.": bug #$bug_id\n";
-=cut
-}
-
-=cut
-
-# File for each version
+ $bugzilla->add_blockers ($bug_id, $parent_bugs);
+ $comment .= $bug->{'version'}.": bug #$bug_id\n";
+ }
+
+ foreach my $bug (@{$parent_bugs}) {
+ $bugzilla->add_private_comment ($bug, $comment);
+ }
-my $comment = "Created Fedora tracking bugs for $component:\n\n";
-
-=cut
-=cut
-
-# Add comment to original bugs
-
-foreach my $bug (@bugs) {
- $bugzilla->add_private_comment ($bug, $comment);
+ return $comment;
}
-
-print STDERR $comment;
-=cut
More information about the Fedora-security-commits
mailing list