Rename mkadvisories to mgaadv

1 files changed, 14 insertions, 0 deletions

diff --git a/mgaadv b/mgaadv
new file mode 100755
index 0000000..7e3ec41
--- /dev/null
+++ b/mgaadv
@@ -0,0 +1,14 @@
+#!/usr/bin/perl -w
+
+use strict;
+use MGA::Advisories;
+
+my %advdb;
+$advdb{advisories} = MGA::Advisories::get_advisories();
+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_mail(\%advdb);
+