[dw-free] Show access/subscriptions in common when viewing profiles

[kareila]

[commit: http://hg.dwscoalition.org/dw-free/rev/00f6e0a5698b]

http://bugs.dwscoalition.org/show_bug.cgi?id=743

Adds highlighting on user profiles, bold for access and italic for
subscribed.

Patch by yvi.

Files modified:

• htdocs/userinfo.bml

--------------------------------------------------------------------------------
diff -r a0b17e351f2b -r 00f6e0a5698b htdocs/userinfo.bml
--- a/htdocs/userinfo.bml	Sat Jul 18 13:21:13 2009 +0000
+++ b/htdocs/userinfo.bml	Sat Jul 18 09:45:14 2009 -0500
@@ -219,10 +219,15 @@ body<=
         my $users = $_[0];
         my @linked_users;
 
-        foreach my $u ( @$users ) {
-            my $linked_u = $linkify->( { url => $u->profile_url, text => $u->display_name } );
-            $linked_u = "<strike>$linked_u</strike>"
-                if $strikeuser->( $u );
+        foreach my $user ( @$users ) {
+            my $linked_u = $linkify->( { url => $user->profile_url, text => $user->display_name } );
+            $linked_u = "<strike>$linked_u</strike>" if $strikeuser->( $user );
+            #if user is logged in and not looking at own profile, use appropiate highlighting for users they have in common
+            if ( $remote && ( $remote != $u ) ) {
+                $linked_u = "<em>$linked_u</em>" if $remote->watches( $user );
+                $linked_u = "<strong>$linked_u</strong>"
+                    if ( $user->is_community ? $remote->member_of( $user ) : $remote->trusts( $user ) );
+            }
 
             push @linked_users, $linked_u;
         }
--------------------------------------------------------------------------------

Comments

[cesy]

Yay! Thanks, yvi.

[yvi]

:)

Finally!

[turlough]

Finally, wheeee!!!!