From 2ba19c144a7cdcc42c8bedc5400fce6b0a872415 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Jo=C3=A3o=20Victor=20Duarte=20Martins?=
 <jvictor@mandriva.com>
Date: Mon, 17 May 2010 18:57:36 +0000
Subject: * mdkonline.pm: Added more missing use statements.  
 (get_my_mdv_profile): Fixed subroutine call (readability only).

---
 mdkonline.pm | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

(limited to 'mdkonline.pm')

diff --git a/mdkonline.pm b/mdkonline.pm
index 56f5b560..6c0659f6 100644
--- a/mdkonline.pm
+++ b/mdkonline.pm
@@ -31,6 +31,9 @@ use ugtk2;
 
 use LWP::UserAgent;
 use URI::Escape;
+use XML::Simple;
+use HTTP::Request::Common;
+use HTTP::Request;
 
 our @ISA = qw(Exporter);
 our @EXPORT = qw(find_current_distro
@@ -252,9 +255,9 @@ sub get_from {
 
 sub get_my_mdv_profile {
     my ($email, $password) = @_;
-    xml2perl(mdkonline::get_from('https://my.mandriva.com/rest/authenticate',
-				 [ 'username', $email, 'password', $password, 
-				   'return', 'userdata' ]));
+    xml2perl(get_from('https://my.mandriva.com/rest/authenticate',
+                      [ 'username', $email, 'password', $password, 
+                        'return', 'userdata' ]));
 }
 
 # callers need to require XML::Simple
-- 
cgit v1.2.1