Changeset 12989

Timestamp:

06/01/08 20:07:55 (6 months ago)

Author:

tokuhirom

Message:

we have Plugin::StickyTime?!

Location:

lang/perl/mobirc/branches/plaggerize

Files:

• lib/App/Mobirc/Plugin/GPS.pm (modified) (2 diffs)
• t/Plugins/GPS.t (modified) (2 diffs)

lang/perl/mobirc/branches/plaggerize/lib/App/Mobirc/Plugin/GPS.pm

@@ -23 +23 @@
 
     my $time = time();
-    return tt qq{<a href="/channel/[% channel.name | uri %]/gps?time=[% time | html %]">gps</a>};
+    return tt qq{<a href="/channel/[% channel.name | uri %]/gps">gps</a>};
 };
 
@@ -79 +79 @@
            $msg = uri_escape encode($c->req->mobile_agent->encoding, $msg);
 
-        my $time = time();
-        my $redirect = tt "/channels/[% channel_name | uri %]?msg=L:[% msg %]&t=[% time | uri %]";
+        my $redirect = tt "/channels/[% channel_name | uri %]?msg=L:[% msg %]";
         $c->res->redirect($redirect);
         return 1;

lang/perl/mobirc/branches/plaggerize/t/Plugins/GPS.t

@@ -2 +2 @@
 use warnings;
 use App::Mobirc;
-use Test::More tests => 1;
+use Test::More tests => 2;
 use HTTP::Engine::Context;
 
@@ -24 +24 @@
 $mobirc->run_hook_first('httpd', $c, '/channel/%23coderepos/gps_do');
 is $c->res->status, 302;
-is $c->res->redirect, '/channels/%23coderepos?msg=L:Lat%3A%2035.21.03.342%2C%20Lng%3A%20138.34.45.725&t=1212311430';
+is $c->res->redirect, '/channels/%23coderepos?msg=L:Lat%3A%2035.21.03.342%2C%20Lng%3A%20138.34.45.725';