Subversion Repositories Applications.papyrus

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
433 ddelon 1
<?php
2
 
3
if ($pages = $this->LoadAllPages())
4
{
5
	foreach ($pages as $page)
6
	{
7
		if (!preg_match("/^Comment/", $page["tag"])) {
8
			$firstChar = strtoupper($page["tag"][0]);
9
			if (!preg_match("/[A-Z,a-z]/", $firstChar)) {
10
				$firstChar = "#";
11
			}
12
 
13
			if ($firstChar != $curChar) {
14
				if ($curChar) print("<br />\n");
15
				print("<b>$firstChar</b><br />\n");
16
				$curChar = $firstChar;
17
			}
18
 
19
			print($this->ComposeLinkToPage($page["tag"])."<br />\n");
20
		}
21
	}
22
}
23
else
24
{
25
	print("<i>Aucune page trouv&eacute;e.</i>");
26
}
27
 
28
?>