Possible to mark threads as unread

[ndwebbie.git] / lib / NDWeb / Controller / Forum.pm

diff --git a/lib/NDWeb/Controller/Forum.pm b/lib/NDWeb/Controller/Forum.pm
index a9a1f0d5dc98143bb3d37f8eea870ce947a10307..def82bb5dc12c3690af46e406d884da115a1961c 100644 (file)
--- a/lib/NDWeb/Controller/Forum.pm
+++ b/lib/NDWeb/Controller/Forum.pm
@@ -33,7 +33,7 @@ SELECT fcid,category,fb.fbid,fb.board
        ,date_trunc('seconds',max(ft.mtime)::timestamp ) AS last_post
 FROM forum_categories fc
        JOIN forum_boards fb USING (fcid)
-       JOIN forum_threads ft USING (fbid)
+       LEFT OUTER JOIN forum_threads ft USING (fbid)
        LEFT OUTER JOIN (SELECT * FROM forum_thread_visits WHERE uid = $1)
                ftv USING (ftid)
 WHERE fbid IN (SELECT fbid FROM forum_access
@@ -294,6 +294,20 @@ sub markThreadAsRead : Private {
        }
 }
 
+sub markThreadAsUnread : Local {
+       my ( $self, $c, $thread ) = @_;
+       my $dbh = $c->model;
+
+       my ($fbid) = $dbh->selectrow_array(q{
+SELECT fbid FROM forum_threads WHERE ftid = $1
+               },undef, $thread);
+
+       $dbh->do(q{
+DELETE FROM forum_thread_visits WHERE uid = $1 AND ftid = $2
+               }, undef, $c->user->id, $thread);
+       $c->res->redirect($c->uri_for('board',$fbid));
+}
+
 sub moveThreads : Local {
        my ( $self, $c, $board ) = @_;
        my $dbh = $c->model;
@@ -472,7 +486,7 @@ sub findUsers : Private {
 
        my $query = $dbh->prepare(q{SELECT uid,username FROM users
                WHERE uid > 0 AND uid IN (SELECT uid FROM groupmembers)
-               ORDER BY LOWER(username)});
+               ORDER BY username});
        $query->execute;
 
        $c->stash(users => $query->fetchall_arrayref({}) );
@@ -487,8 +501,8 @@ sub findThread : Private {
                FROM forum_boards fb
                        NATURAL JOIN forum_threads ft
                        NATURAL JOIN forum_categories fc
-                       LEFT OUTER JOIN (SELECT * FROM forum_access
-                               WHERE gid IN (SELECT groups($2))
+                       LEFT OUTER JOIN (SELECT fa.* FROM forum_access fa
+                               JOIN (SELECT groups($2) AS gid) g USING (gid)
                        ) fa USING (fbid)
                WHERE ft.ftid = $1 AND (fa.post IS NOT NULL
                        OR ft.ftid IN (SELECT ftid FROM forum_priv_access WHERE uid = $2))