Changeset 731


Ignore:
Timestamp:
Dec 21, 2005, 6:47:52 PM (16 years ago)
Author:
Dominic Hargreaves
Message:

Couple of things missing from previous commit.

Location:
trunk
Files:
1 added
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/preferences.cgi

    r730 r731  
    1 #!/usr/local/bin/perl
     1#!/usr/bin/perl
    22
    33use warnings;
  • trunk/t/13_cookies.t

    r730 r731  
    44use Time::Piece;
    55use Time::Seconds;
    6 use Test::More tests => 19;
     6use Test::More tests => 20;
    77
    88eval { OpenGuides::CGI->make_prefs_cookie; };
     
    2828    cookie_expires             => "never",
    2929    track_recent_changes_views => 1,
     30    display_google_maps => 1
    3031);
    3132isa_ok( $cookie, "CGI::Cookie", "->make_prefs_cookie returns a cookie" );
     
    6465is( $prefs{cookie_expires}, "never", "...and requested cookie expiry" );
    6566ok( $prefs{track_recent_changes_views}, "...and recent changes tracking" );
     67is( $prefs{display_google_maps}, 1, "...and Google Maps display preference" );
    6668
    6769# Check that cookie parsing fails nicely if no cookie set.
     
    6971%prefs = eval { OpenGuides::CGI->get_prefs_from_cookie( config => $config ); };
    7072is( $@, "", "->get_prefs_from_cookie doesn't die if no cookie set" );
    71 is( keys %prefs, 9, "...and returns nine default values" );
     73is( keys %prefs, 10, "...and returns ten default values" );
Note: See TracChangeset for help on using the changeset viewer.