diff options
| author | João Victor Duarte Martins <jvictor@mandriva.com> | 2010-05-18 00:22:42 +0000 |
|---|---|---|
| committer | João Victor Duarte Martins <jvictor@mandriva.com> | 2010-05-18 00:22:42 +0000 |
| commit | 1881e679ee123529bc28dd23befe74e50051d1ed (patch) | |
| tree | 3ae4e4f7c6744748b465446a4c9213b3636e8f69 /mdkonline.pm | |
| parent | fff8a57999106a3ab093f2e8680d0b5f018a283f (diff) | |
| download | mgaonline-1881e679ee123529bc28dd23befe74e50051d1ed.tar mgaonline-1881e679ee123529bc28dd23befe74e50051d1ed.tar.gz mgaonline-1881e679ee123529bc28dd23befe74e50051d1ed.tar.bz2 mgaonline-1881e679ee123529bc28dd23befe74e50051d1ed.tar.xz mgaonline-1881e679ee123529bc28dd23befe74e50051d1ed.zip | |
Fixing syntax for perl_checker.
Diffstat (limited to 'mdkonline.pm')
| -rw-r--r-- | mdkonline.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/mdkonline.pm b/mdkonline.pm index 6c0659f6..50f9457f 100644 --- a/mdkonline.pm +++ b/mdkonline.pm @@ -92,7 +92,7 @@ sub is_it_2008_0() { } sub is_extmaint_supported() { - $product_id->{support} eq 'extended' + $product_id->{support} eq 'extended'; } sub is_enterprise_media_supported() { @@ -179,7 +179,7 @@ sub translate_product { powerPack => N("Mandriva PowerPack"), server => N("Mandriva Enterprise Server"), ); - $product or $product = lc $product_id->{product}; + $product ||= lc $product_id->{product}; $strings{$product} || $product; } @@ -199,7 +199,7 @@ sub get_urpmi_options() { sub add_medium_enterprise { my ($email, $password, $version, $arch) = @_; - my $uri = sprintf("https://%s:%s\@download.mandriva.com/%s/rpms/%s/", + my $uri = sprintf("https://%s:%s@download.mandriva.com/%s/rpms/%s/", uri_escape($email), uri_escape($password), $version, @@ -210,7 +210,7 @@ sub add_medium_enterprise { sub add_medium_powerpack { my ($email, $password, $version, $arch) = @_; - my $uri = sprintf("https://%s:%s\@dl.mandriva.com/rpm/comm/%s/", + my $uri = sprintf("https://%s:%s@dl.mandriva.com/rpm/comm/%s/", uri_escape($email), uri_escape($password), $version); |