[Rt-commit] r7375 - rt/branches/3.7-EXPERIMENTAL-TUNIS/t/web

[ruz at bestpractical.com]

Author: ruz
Date: Tue Mar 27 12:44:21 2007
New Revision: 7375

Modified:
   rt/branches/3.7-EXPERIMENTAL-TUNIS/t/web/basic.t

Log:
* form and follow methods of WWW::Mechanize have been removed
  in recent versions

Modified: rt/branches/3.7-EXPERIMENTAL-TUNIS/t/web/basic.t
==============================================================================
--- rt/branches/3.7-EXPERIMENTAL-TUNIS/t/web/basic.t	(original)
+++ rt/branches/3.7-EXPERIMENTAL-TUNIS/t/web/basic.t	Tue Mar 27 12:44:21 2007
@@ -42,7 +42,7 @@
 
 $agent->get($url."Ticket/Create.html?Queue=1");
 is ($agent->{'status'}, 200, "Loaded Create.html");
-$agent->form(3);
+$agent->form_number(3);
 # Start with a string containing characters in latin1
 my $string = "I18N Web Testing æøå";
 Encode::from_to($string, 'iso-8859-1', 'utf8');
@@ -55,7 +55,7 @@
 
 $agent->get($url."Ticket/Create.html?Queue=1");
 is ($agent->{'status'}, 200, "Loaded Create.html");
-$agent->form(3);
+$agent->form_number(3);
 # Start with a string containing characters in latin1
 my $string = "I18N Web Testing æøå";
 Encode::from_to($string, 'iso-8859-1', 'utf8');