@ -111,7 +111,7 @@ sub browser_name_in {
sub wait_for_text {
my ( $ self , $ xpath , $ expected , $ timeout ) = @ _ ;
return unless $ xpath && $ expected ;
$ timeout = 15 unless $ timeout ; # seconds. Default timeout value if none is specified.
$ timeout = 20 unless $ timeout ; # seconds. Default timeout value if none is specified.
my $ started = time ( ) ;
my $ elapsed = time ( ) ;
while ( $ elapsed - $ started <= $ timeout ) {
@ -127,7 +127,7 @@ sub move_and_click {
my ( $ self , $ path , $ type , $ fallback , $ timeout ) = @ _ ;
return unless $ path && $ type ;
my $ action_chains = Selenium::ActionChains - > new ( driver = > $ self ) ;
$ timeout = 15 unless $ timeout ; # seconds. Default timeout value if none is specified.
$ timeout = 20 unless $ timeout ; # seconds. Default timeout value if none is specified.
my $ started = time ( ) ;
my $ elapsed = time ( ) ;
while ( $ elapsed - $ started <= $ timeout ) {
@ -148,7 +148,7 @@ sub move_and_click {
sub wait_for_attribute {
my ( $ self , $ path , $ attrib , $ expected , $ timeout ) = @ _ ;
return unless $ path && $ attrib && $ expected ;
$ timeout = 15 unless $ timeout ; # seconds. Default timeout value if none is specified.
$ timeout = 20 unless $ timeout ; # seconds. Default timeout value if none is specified.
my $ started = time ( ) ;
my $ elapsed = time ( ) ;
while ( $ elapsed - $ started <= $ timeout ) {