diff options
Diffstat (limited to 'mgaadv')
-rwxr-xr-x | mgaadv | 14 |
1 files changed, 14 insertions, 0 deletions
@@ -93,6 +93,15 @@ $0 publish [bugnum] Assign a new ID to an advisory file. END }, + 'publish-all' => { + run => \&publishall, + descr => 'Publish all pending advisories', + usage => <<END +$0 publish-all + +Assign a new ID to all pending, validated advisories (subject to cross checks). +END + }, show => { run => \&showadv, descr => 'Show an advisory', @@ -189,6 +198,11 @@ sub publish { MGA::Advisories::assign_id($_[1]); } +sub publishall { + usageexit('usage', $_[0]) unless @_ == 1; + MGA::Advisories::assign_ids(); +} + sub listadv { shift; my %advdb; |