[www-sms-commit] SF.net SVN: www-sms: [343] trunk/WWW-SMS/lib/WWW/SMS/Alice.pm

[<ei...@us...>]

Revision: 343
          http://svn.sourceforge.net/www-sms/?rev=343&view=rev
Author:   eim
Date:     2007-03-02 07:24:17 -0800 (Fri, 02 Mar 2007)

Log Message:
-----------
Fabio Marzocca fixed the latest bug. Should work now.

Modified Paths:
--------------
    trunk/WWW-SMS/lib/WWW/SMS/Alice.pm

Modified: trunk/WWW-SMS/lib/WWW/SMS/Alice.pm
===================================================================
--- trunk/WWW-SMS/lib/WWW/SMS/Alice.pm	2006-12-27 21:33:43 UTC (rev 342)
+++ trunk/WWW-SMS/lib/WWW/SMS/Alice.pm	2007-03-02 15:24:17 UTC (rev 343)
@@ -142,11 +142,11 @@
     my $finalurl="http://portale.rossoalice.alice.it/ps/PortaleServizi.do";
     my $uname = $self->{username}."\@alice.it";
 
-    $res = $ua->get("http://authsrs.alice.it/aap/validatecredential?login=".$uname."&pwd=".$self->{passwd}."&URL_OK=".$finalurl."&servizio=sms_inviosmsalice&msisdn=".$self->{username}."&username=".$uname."&user=".$uname."&a3aid=comhpvi&PASS=".$self->{passwd}."&dominio=\@alice.it&usernameDisplay=".$self->{username}."&password=".$self->{passwd});
+      $res = $ua->get("http://authsrs.alice.it/aap/validatecredential?usernameDisplay=".$self->{username}."&dominio=%40alice.it&password=".$self->{passwd}."&login=".$uname."&pwd=".$self->{passwd}."&channel=hp_alice&servizio=mail&msisdn=".$self->{username}."&username=".$uname."&user=".$uname."&a3aid=na&a3afep=http%3A%2F%2Fportale.rossoalice.alice.it%2Fps%2FManageCodError.do%3Fcode%3D470%26channel%3Dmail_alice&DOMAIN=&PASS=".$self->{passwd});
   
 
     return &hnd_error($debug ? "$step ($res)" : $step)
-        unless $res->{_content} =~ /Portale Alice/;
+        unless $res->{_content} =~ /loggato/;
 
 
     #


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.