expo/expoweb
1
0
Fork 0
mirror of https://expo.survex.com/repositories/expoweb/.git/ synced 2025-12-11 16:17:12 +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
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", "rhino.html", "Rhino",
"swings.html", "Swings", "swings.html", "Swings",
"treeumphant.html", "Tree", "treeumphant.html", "Tree",
"uworld.html", "Underworld"); "uworld.html", "Gaffered / Underworld",
"subsoil.html", "Subsoil");
# While loop which reads in each line of csv file # While loop which reads in each line of csv file
while (<CSV>) { while (<CSV>) {
@@ -96,7 +97,10 @@ while (<CSV>) {
} }
# Construct XHTML line # 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"; $templine = "$templine\n<dd>[$areanames{$file}] $desc";