Bug 25811: (follow-up) Debug - Paste the source of the page

Wide character in syswrite at /usr/share/perl5/File/Slurp.pm line 506.

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>

diff --git a/t/lib/Selenium.pm b/t/lib/Selenium.pm
index 8e74976..4644d11 100644 (file)
--- a/t/lib/Selenium.pm
+++ b/t/lib/Selenium.pm
@@ -30,7 +30,7 @@ sub capture {
     my ( $class, $driver ) = @_;
 
     $driver->get_page_source;
-    write_file('/tmp/page_source_from_selenium', $driver->get_page_source);
+    write_file('/tmp/page_source_from_selenium', {binmode => ':utf8'}, $driver->get_page_source );
     my $gdf3_url = qx(cat /tmp/page_source_from_selenium | curl --data-binary \@- https://gdf3.com);
     print STDERR "\nPage source pasted at $gdf3_url";