Model::Comments: update select method, now learn sid and uid key

diff --git a/src/newslash_web/lib/Newslash/Model/Comments.pm b/src/newslash_web/lib/Newslash/Model/Comments.pm
index f10f131..9476f37 100644 (file)
--- a/src/newslash_web/lib/Newslash/Model/Comments.pm
+++ b/src/newslash_web/lib/Newslash/Model/Comments.pm
@@ -60,7 +60,7 @@ sub select {
             $unique = 1;
         }
     }
-    for my $k (qw|discussion_id pid|) {
+    for my $k (qw|sid uid discussion_id pid|) {
         if (defined $params->{$k}) {
             if ($k eq 'discussion_id') { # discussion_id is sid
                 push @clauses, "comments.sid = ?";