[Catalyst-commits] r8948 - Catalyst-Plugin-SmartURI/1.000/trunk/t

[caelum at dev.catalyst.perl.org]

Author: caelum
Date: 2008-12-26 19:44:09 +0000 (Fri, 26 Dec 2008)
New Revision: 8948

Removed:
   Catalyst-Plugin-SmartURI/1.000/trunk/t/04-smart-uri-subclass.t
Log:
remove old unnecessary test

Deleted: Catalyst-Plugin-SmartURI/1.000/trunk/t/04-smart-uri-subclass.t
===================================================================
--- Catalyst-Plugin-SmartURI/1.000/trunk/t/04-smart-uri-subclass.t	2008-12-26 00:40:13 UTC (rev 8947)
+++ Catalyst-Plugin-SmartURI/1.000/trunk/t/04-smart-uri-subclass.t	2008-12-26 19:44:09 UTC (rev 8948)
@@ -1,51 +0,0 @@
-use strict;
-use warnings;
-
-use Test::More tests => 6;
-
-{
-    package MyURI;
-
-    use base 'Catalyst::SmartURI';
-
-    sub mtfnpy {
-        my $uri = shift;
-        $uri->query_form([ $uri->query_form, qw(foo bar) ]);
-        $uri
-    }
-
-    package TestApp;
-
-    use Catalyst 'SmartURI';
-
-    sub foo : Global {
-        my ($self, $c) = @_;
-        $c->res->output($c->uri_for('/foo')->mtfnpy)
-    }
-
-    __PACKAGE__->config->{smarturi}{uri_class} = 'MyURI';
-    __PACKAGE__->setup;
-}
-
-BEGIN {
-    MyURI->import('-import_uri_mods');
-    use_ok('MyURI::URL')
-}
-
-is(MyURI::URL->new('http://search.cpan.org/~lwall/')->path,
-    '/~lwall/', 'Magic import');
-
-ok(my $uri = MyURI->new('http://www.catalystframework.org/calendar',
-                    { reference => 'http://www.catalystframework.org/' }),
-                    'new');
-
-is($uri->mtfnpy,
-   'http://www.catalystframework.org/calendar?foo=bar', 'new method');
-
-is($uri->reference, 'http://www.catalystframework.org/', 'old method');
-
-use Catalyst::Test 'TestApp';
-
-is(get('/foo'), 'http://localhost/foo?foo=bar', 'configured uri_class');
-
-# vim: expandtab shiftwidth=4 ts=4 tw=80: