Add "?authas=community" to link to manage/comments if applicable.

        Patch by yvi. 

diffs (13 lines):

diff -r cb3016e86c40 -r d859441db241 htdocs/tools/recent_comments.bml
--- a/htdocs/tools/recent_comments.bml  Sat Nov 28 10:01:10 2009 +0000
+++ b/htdocs/tools/recent_comments.bml  Sat Nov 28 10:19:16 2009 +0000
@@ -85,7 +85,8 @@ body<=
     $ret .= BML::ml('Actionlink', { link => $ML{'.latest.received'}}) . " "
         if $u->is_person;
     $ret .= BML::ml('Actionlink', { link => "<a 
href='#posted'>$ML{'.latest.posted'}</a>"}) . " ";
-    $ret .= BML::ml('Actionlink', { link => "<a 
href='$LJ::SITEROOT/manage/comments'>$ML{'.managesettings'}</a>"});
+    my $getextra = $authas ne $remote->user ? "?authas=$authas" : "";
+    $ret .= BML::ml('Actionlink', { link => "<a 
href='$LJ::SITEROOT/manage/comments$getextra'>$ML{'.managesettings'}</a>"});
 
     $ret .= "<br />";
     $ret .= " $ML{ '.view.latest' } [ ";
_______________________________________________
dw-changelog mailing list
[email protected]
http://lists.dwscoalition.org/mailman/listinfo/dw-changelog

Reply via email to