body<= $user, 'name' => $name, 'numreaders' => $count, 'synurl' => $url }; } # Query already defaults to "numreaders" sort if ($GET{'sort'} eq "username") { @data = sort { $a->{'user'} cmp $b->{'user'} } @data; } if ($GET{'sort'} eq "feeddesc") { @data = sort { $a->{'name'} cmp $b->{'name'} } @data; } return "" unless @data; my %items = BML::paging(\@data, $GET{'page'}, 100); my $navbar = LJ::paging_bar($items{'page'}, $items{'pages'}); @data = @{$items{'items'}}; $ret .= $navbar . ""; $ret .= $GET{'sort'} eq "username" ? "": "": "": ""; foreach (@data) { $ret .= ""; $ret .= ""; $ret .= ""; $ret .= ""; $ret .= ""; $ret .= ""; } $ret .= "

" . $ML{'.username'} . "	"username"}) . "'>" . $ML{'.username'} . ""; $ret .= $GET{'sort'} eq "feeddesc" ? "	" . $ML{'.feeddesc'} . "	"feeddesc"}) . "'>" . $ML{'.feeddesc'} . ""; $ret .= $GET{'sort'} eq "numreaders" ? "	" . $ML{'.numreaders'} . "	"numreaders"}) . "'>" . $ML{'.numreaders'} . ""; $ret .= "
" . LJ::ljuser($_->{'user'}, { 'type' => 'Y' }) . "	" . LJ::ehtml($_->{'name'}) . "	" . $_->{'numreaders'} . "	". "

" . $navbar; return $ret; _code?> <=body head<= <=head page?>