… | |
… | |
152 | |
152 | |
153 | if ($status ne "200") { |
153 | if ($status ne "200") { |
154 | my $msg; |
154 | my $msg; |
155 | |
155 | |
156 | if (exists $res->{error}) { |
156 | if (exists $res->{error}) { |
157 | $msg = "AyEvent::WebDriver: $res->{error}: $res->{message}"; |
157 | $msg = "AnyEvent::WebDriver: $res->{error}: $res->{message}"; |
158 | $msg .= "\n$res->{stacktrace}caught at" if length $res->{stacktrace}; |
158 | $msg .= "\n$res->{stacktrace}caught at" if length $res->{stacktrace}; |
159 | } else { |
159 | } else { |
160 | $msg = "AnyEvent::WebDriver: http status $status (wrong endpoint?), caught"; |
160 | $msg = "AnyEvent::WebDriver: http status $status (wrong endpoint?), caught"; |
161 | } |
161 | } |
162 | |
162 | |