getValidSpecialPages();
$log = new LogPage( $vsp["Shortpages"] );
$log->mUpdateRecentChanges = false;
global $wgMiserMode;
if ( $wgMiserMode ) {
$log->showAsDisabledPage();
return;
}
list( $limit, $offset ) = wfCheckLimits();
$sql = "SELECT cur_title, LENGTH(cur_text) AS len FROM cur " .
"WHERE cur_namespace=0 AND cur_is_redirect=0 ORDER BY " .
"LENGTH(cur_text) LIMIT {$offset}, {$limit}";
$res = wfQuery( $sql, DB_READ, $fname );
$top = wfShowingResults( $offset, $limit );
$wgOut->addHTML( "{$top}\n" );
$sl = wfViewPrevNext( $offset, $limit,
$wgLang->specialPage( "Shortpages" ) );
$wgOut->addHTML( "
{$sl}\n" );
$sk = $wgUser->getSkin();
$s = "
";
while ( $obj = wfFetchObject( $res ) ) {
$nb = wfMsg( "nbytes", $obj->len );
$link = $sk->makeKnownLink( $obj->cur_title, "" );
$s .= "- {$link} ({$nb})
\n";
}
wfFreeResult( $res );
$s .= "
";
$wgOut->addHTML( $s );
$wgOut->addHTML( "{$sl}\n" );
# Saving cache
if ( $offset > 0 OR $limit < 50 ) return ; #Not suitable
$log->replaceContent( $s );
}
?>