expo/expoweb
1
0
Fork 0
mirror of https://expo.survex.com/repositories/expoweb/.git/ synced 2025-01-30 23:22:31 +00:00
Code Issues Packages Projects Releases Wiki Activity

[svn r7273] minor edits

Browse Source
This commit is contained in:
dave 2005-11-07 15:58:38 +01:00
parent 797c9ca2ed
commit c69c7fccce
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
smkridge/204/make-glossary.pl
View File

@ -77,7 +77,8 @@ my %areanames =
"rhino.html", "Rhino",
"swings.html", "Swings",
"treeumphant.html", "Tree",
"uworld.html", "Underworld");
"uworld.html", "Gaffered / Underworld",
"subsoil.html", "Subsoil");
# While loop which reads in each line of csv file
while (<CSV>) {
@ -96,7 +97,10 @@ while (<CSV>) {
}
# Construct XHTML line
$templine = "<dt><a href=\"$file#$fragment\">$name</a></dt>";
if($fragment)
{ $templine = "<dt><a href=\"$file#$fragment\">$name</a></dt>" }
else
{ $templine = "<dt><a href=\"$file\">$name</a></dt>" };
$templine = "$templine\n<dd>[$areanames{$file}] $desc";