+sub markPostAsUnread : Local {
+ my ( $self, $c, $post ) = @_;
+ my $dbh = $c->model;
+
+ my ($fbid) = $dbh->selectrow_array(q{
+SELECT fbid FROM forum_threads JOIN forum_posts USING (ftid) WHERE fpid = $1
+ },undef, $post);
+
+ $dbh->do(q{
+UPDATE forum_thread_visits ftv SET time = (fp.time - interval '1 second')
+FROM forum_posts fp
+WHERE ftv.uid = $1 AND fp.fpid = $2 AND fp.ftid = ftv.ftid
+ }, undef, $c->user->id, $post);
+ $c->res->redirect($c->uri_for('board',$fbid));
+}
+