diff options
author | Colin Guthrie <colin@mageia.org> | 2014-08-03 19:12:40 +0100 |
---|---|---|
committer | Colin Guthrie <colin@mageia.org> | 2014-08-03 19:12:59 +0100 |
commit | d715427162dea4dff161104350ad4e568a51a395 (patch) | |
tree | 8f4bf69f7ba07d321d44afd2aef32eb5f16bf549 /mgaadv | |
parent | af119daf37015b8f8f787a6ac9b60e9bc666a4f3 (diff) | |
download | mgaadvisories-d715427162dea4dff161104350ad4e568a51a395.tar mgaadvisories-d715427162dea4dff161104350ad4e568a51a395.tar.gz mgaadvisories-d715427162dea4dff161104350ad4e568a51a395.tar.bz2 mgaadvisories-d715427162dea4dff161104350ad4e568a51a395.tar.xz mgaadvisories-d715427162dea4dff161104350ad4e568a51a395.zip |
Add a new command to move the packages.
This shells out to a separate command that actually implements this.
Such a tool exists already in mgatools called 'mga-move-pkg'
Diffstat (limited to 'mgaadv')
-rwxr-xr-x | mgaadv | 21 |
1 files changed, 21 insertions, 0 deletions
@@ -56,6 +56,15 @@ $0 mksite Generates the advisories web site END }, + process => { + run => \&process, + descr => 'Process advisories', + usage => <<END, +$0 process + +Process advisories i.e. move the [S]RPMs, update website, send emails +END + }, new => { run => \&newadv, descr => 'Create a new advisory file', @@ -139,6 +148,18 @@ sub mksite { MGA::Advisories::send_report(\%advdb); } +sub process { + my %advdb; + $advdb{advisories} = MGA::Advisories::get_advisories(); + MGA::Advisories::move_packages(\%advdb); + MGA::Advisories::publish_advisories(\%advdb); + MGA::Advisories::sort_advisories(\%advdb); + MGA::Advisories::output_pages(\%advdb); + MGA::Advisories::dumpdb(\%advdb); + MGA::Advisories::send_adv_mail(\%advdb); + MGA::Advisories::send_report(\%advdb); +} + sub editor { $ENV{EDITOR} || $ENV{VISUAL} || '/usr/bin/editor' } sub newadv { |