Fix entryprops display of crosspost entry properties.

        Patch by afuna. 

diffs (24 lines):

diff -r c4507f696f71 -r f3b4f72cb8b5 htdocs/admin/entryprops.bml
--- a/htdocs/admin/entryprops.bml       Wed Apr 21 22:56:22 2010 +0000
+++ b/htdocs/admin/entryprops.bml       Wed Apr 21 22:59:20 2010 +0000
@@ -81,11 +81,16 @@ body<=
             $props{$prop} = LJ::mysql_time($props{$prop}) if $p->{des} =~ 
/unix/i;
             
             # render xpost prop into human readable form
-            if ( $prop eq "xpost" ) {
-                my %external_accounts_map = map { $_->siteid => $_->servername 
}  DW::External::Account->get_external_accounts(  $entry->poster );
+            if ( $prop eq "xpost" || $prop eq "xpostdetail" ) {
+                my %external_accounts_map = map { $_->acctid => $_->servername 
} DW::External::Account->get_external_accounts( $entry->poster );
                 my %xpost_map = %{ 
DW::External::Account->xpost_string_to_hash( $props{$prop} ) };
-                $props{$prop} = join ", ", map { ( $external_accounts_map{$_} 
|| "unknown" ) . " => $xpost_map{$_}" } keys %xpost_map;
-                $p->{des} .= " (site name => itemid)";
+                if ( $prop eq "xpost" ) {
+                    $props{$prop} = join ", ", map { ( 
$external_accounts_map{$_} || "unknown" ) . " => $xpost_map{$_}" } keys 
%xpost_map;
+                    $p->{des} .= " (site name => itemid)";
+                } else {
+                    $props{$prop} = join ", ", map { ( 
$external_accounts_map{$_} || "unknown" ) . " => { $xpost_map{$_}->{itemid}, 
$xpost_map{$_}->{url} }" } keys %xpost_map;
+                    $p->{des} .= " (site name => { itemid, url })";
+                }
             }
 
             $extra = "<br /><small>$p->{des}</small>";
_______________________________________________
dw-changelog mailing list
[email protected]
http://lists.dwscoalition.org/mailman/listinfo/dw-changelog

Reply via email to