diff --git a/Netdisco/t/11-webtoolkit.base64.t b/Netdisco/t/11-webtoolkit.base64.t new file mode 100644 index 00000000..84fe2b54 --- /dev/null +++ b/Netdisco/t/11-webtoolkit.base64.t @@ -0,0 +1,18 @@ +#!/usr/bin/perl +use strict; +use warnings; + +use Test::More; +use Env::Path; +use FindBin qw( $Bin ); + +my @phantomjs = Env::Path->PATH->Whence('phantomjs'); +my $phantomjs = scalar @phantomjs ? $phantomjs[0] : $ENV{ND_PHANTOMJS}; + +if ( !-x $phantomjs ) { + plan skip_all => + "phantomjs not found, please set ND_PHANTOMJS or install phantomjs to the default location"; +} +else { + exec( $phantomjs, "$Bin/run_qunit.js", "$Bin/webtoolkit.base64.html" ); +} diff --git a/Netdisco/t/webtoolkit.base64.html b/Netdisco/t/webtoolkit.base64.html new file mode 100644 index 00000000..46c8b96d --- /dev/null +++ b/Netdisco/t/webtoolkit.base64.html @@ -0,0 +1,34 @@ + + +
+ +