Fix bad path to magnify clip
[lhc/web/wiklou.git] / includes / SpecialUnusedimages.php
1 <?php
2
3 function wfSpecialUnusedimages() {
4 global $wgUser, $wgOut, $wgLang, $wgTitle;
5 $fname = "wfSpecialUnusedimages";
6
7 list( $limit, $offset ) = wfCheckLimits();
8
9 $sql = "SELECT img_name,img_user,img_user_text,img_timestamp,img_description " .
10 "FROM image LEFT JOIN imagelinks ON img_name=il_to WHERE il_to IS NULL " .
11 "ORDER BY img_timestamp LIMIT {$offset}, {$limit}";
12 $res = wfQuery( $sql, DB_READ, $fname );
13
14 $sk = $wgUser->getSkin();
15
16 $wgOut->addHTML( wfMsg( "unusedimagestext" ) );
17 $top = wfShowingResults( $offset, $limit );
18 $wgOut->addHTML( "<p>{$top}\n" );
19
20 $sl = wfViewPrevNext( $offset, $limit,
21 $wgLang->specialPage( "Unusedimages" ) );
22 $wgOut->addHTML( "<br />{$sl}</p>\n" );
23
24 $ins = $wgLang->getNsText ( 6 ) ;
25 $s = "<ol start='" . ( $offset + 1 ) . "'>";
26 while ( $obj = wfFetchObject( $res ) ) {
27 $name = $obj->img_name;
28 $dlink = $sk->makeKnownLink( "{$ins}:{$name}", wfMsg( "imgdesc" ) );
29 $ilink = "<a href=\"" . Image::wfImageUrl( $name ) . "\">{$name}</a>";
30
31 $d = $wgLang->timeanddate( $obj->img_timestamp, true );
32 $u = $obj->img_user;
33 $ut = $obj->img_user_text;
34 $c = $obj->img_description;
35
36 if ( 0 == $u ) { $ul = $ut; }
37 else { $ul = $sk->makeLink( $wgLang->getNsText(2).":{$ut}", $ut ); }
38
39 $s .= "<li>({$dlink}) {$ilink} . . {$d} . . {$ul}";
40
41 if ( "" != $c && "*" != $c ) { $s .= " <em>({$c})</em>"; }
42 $s .= "</li>\n";
43 }
44 wfFreeResult( $res );
45 $s .= "</ol>\n\n";
46 $wgOut->addHTML( $s );
47 $wgOut->addHTML( "<p>{$sl}</p>\n" );
48 }
49
50 ?>