|
Lines 28-34
__PACKAGE__->mk_accessors(qw(login password base_url opac_base_url selenium_addr
Link Here
|
| 28 |
sub capture { |
28 |
sub capture { |
| 29 |
my ( $class, $driver ) = @_; |
29 |
my ( $class, $driver ) = @_; |
| 30 |
|
30 |
|
| 31 |
my $lutim_server = q|https://framapic.org|; # Thanks Framasoft! |
31 |
my $lutim_server = q|https://pic.infini.fr/|; # Thanks Infini! |
| 32 |
$driver->capture_screenshot('selenium_failure.png'); |
32 |
$driver->capture_screenshot('selenium_failure.png'); |
| 33 |
my $from_json = from_json qx{curl -s -F "format=json" -F "file=\@selenium_failure.png" -F "delete-day=1" $lutim_server}; |
33 |
my $from_json = from_json qx{curl -s -F "format=json" -F "file=\@selenium_failure.png" -F "delete-day=1" $lutim_server}; |
| 34 |
if ( $from_json ) { |
34 |
if ( $from_json ) { |
| 35 |
- |
|
|