aboutsummaryrefslogtreecommitdiffstats
path: root/mgaadv
diff options
context:
space:
mode:
Diffstat (limited to 'mgaadv')
-rwxr-xr-xmgaadv21
1 files changed, 21 insertions, 0 deletions
diff --git a/mgaadv b/mgaadv
index e2ed080..229d133 100755
--- a/mgaadv
+++ b/mgaadv
@@ -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 {