From 0e98690c1363d7d349f58de79c1470f70d190df0 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Thu, 26 Nov 2009 15:46:01 +0000 Subject: (translate_product) extract it from prepare_add_restricted() into a shared module (needed for next commits) --- mdkonline.pm | 10 ++++++++++ 1 file changed, 10 insertions(+) (limited to 'mdkonline.pm') 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( -- cgit v1.2.1