X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fbasic.t;h=d25f69fa7ec2a66e7fde4cb9347f1be6661d92ed;hb=aed484dac6fde4b3d17cebfaccea5c14560f8ce9;hp=ac7dab696795d508a0c2493e85af44a7c5fe22e2;hpb=2e4bde8970fc3d645faf7d6156860b069d61899e;p=catagits%2FCatalyst-Plugin-Cache.git diff --git a/t/basic.t b/t/basic.t index ac7dab6..d25f69f 100644 --- a/t/basic.t +++ b/t/basic.t @@ -21,7 +21,7 @@ use ok "Catalyst::Plugin::Cache"; sub new { bless {}, shift } sub get { ${thaw($_[0]{$_[1]}) || return} }; sub set { $_[0]{$_[1]} = freeze(\$_[2]) }; - sub delete { delete $_[0]{$_[1]} }; + sub remove { delete $_[0]{$_[1]} }; } MockApp->setup; @@ -65,13 +65,13 @@ can_ok( $c, "choose_cache_backend" ); can_ok( $c, "cache_set" ); can_ok( $c, "cache_get" ); -can_ok( $c, "cache_delete" ); +can_ok( $c, "cache_remove" ); $c->cache_set( foo => "bar" ); is( $c->cache_get("foo"), "bar", "set" ); -$c->cache_delete( "foo" ); -is( $c->cache_get("foo"), undef, "delete" ); +$c->cache_remove( "foo" ); +is( $c->cache_get("foo"), undef, "remove" ); MockApp->register_cache_backend( elk => MemoryCache->new );