t/unit_fixture/Static/JavaScript.t

   1 use strict;
   2 use warnings;
   3 use Test::More;
   4 use Test::Warn;
   5 use Data::Dumper;
   6
   7 use lib 't/lib';
   8
   9 use SGN::Test::WWW::Mechanize skip_cgi => 1;
  10
  11 my $mech = SGN::Test::WWW::Mechanize->new;
  12
  13 # { # test serving a single JS file
  14
  15     # $mech->get_ok( '/js/Text/Markup.js' );
  16     # $mech->content_like( qr/function\s*\(/,'served a single JS file' );
  17     #
  18     # $mech->get( '/js/Nonexistent.js' );
  19     # $mech->content_like( qr/not found/i, 'nonexistent js says not found' );
  20     #
  21     # #die "$res";
  22     # is( $mech->status, 404, 'gives a 404' );
  23     #
  24     # $mech->get( '/js/CXGN/Page/' );
  25     # $mech->content_like( qr/not found/i, 'nonexistent js says not found' );
  26     # is( $mech->status, 404, 'gives a 404' );
  27     #
  28     # $mech->get( '/js/CXGN/Page' );
  29     # $mech->content_like( qr/not found/i, 'nonexistent js says not found' );
  30     # is( $mech->status, 404, 'gives a 404' );
  31
  32 # }
  33 is(1, 1);
  34 done_testing();