diff options
Diffstat (limited to 'mdkonline.pm')
-rw-r--r-- | mdkonline.pm | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/mdkonline.pm b/mdkonline.pm index b605e976..5b7906e7 100644 --- a/mdkonline.pm +++ b/mdkonline.pm @@ -36,6 +36,7 @@ our @EXPORT = qw(fork_exec get_stale_upgrade_filename is_enterprise_media_supported is_restricted_media_supported + translate_product xml2perl $product_id $root); @@ -79,6 +80,15 @@ sub fork_exec { run_program::raw({ detach => 1 }, @_); } +sub translate_product() { + my %strings = ( + PowerPack => N("Mandriva PowerPack"), + Server => N("Mandriva Enterprise Server"), + ); + my $product = $product_id->{product}; + $strings{$product} || $product; +} + sub get_banner { my ($o_title) = @_; Gtk2::Banner->new( |