diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/MGA/Advisories.pm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/lib/MGA/Advisories.pm b/lib/MGA/Advisories.pm index c5a31e1..f32625a 100644 --- a/lib/MGA/Advisories.pm +++ b/lib/MGA/Advisories.pm @@ -227,4 +227,10 @@ sub newadv { return $file; } +sub listadv { + my ($advdb) = @_; + print map { "$_: $advdb->{advisories}{$_}{subject}\n" } + sort keys %{$advdb->{advisories}}; +} + 1; |