expo/expoweb
1
0
Fork 0
mirror of https://expo.survex.com/repositories/expoweb/.git/ synced 2025-12-08 14:54:28 +00:00
Code Issues Packages Projects Releases Wiki Activity

[svn r5899] Finally: all the links are well and truly fettled. I think I should retire on the spot, and leave maintaining the resulting mess to other people.

Browse Source
This commit is contained in:
dl267
2004-04-29 19:43:49 +02:00
parent 6e081d6212
commit 3b3efbd05c
204 changed files with 3455 additions and 3447 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
noinfo/make-indxal4.pl
View File

@@ -132,6 +132,7 @@ sub do_this_line {
$linkid =~ s/\(/:/;
$linkid =~ s/\)/:/;
$linkid =~ s/ /_/;
$linkid = lc($linkid);
# Determine the number of directorys deep the caves main page is at in order to link to area descriptions and indxal
my $toroot = 'Q'; # hey; it's magic
@@ -366,7 +367,7 @@ END
print FILE "<li><a href=\"$toroot\/wilden\/index.htm#$linkid\">Schwarzmoos-Wildensee area index and description</a></li>\n";
}
if ($area =~ /6/) {
print FILE "<li><a href=\"$toroot\/plateau\/index.htm#$linkid\">Far plateau area index and description</a></li>\n";
print FILE "<li><a href=\"$toroot\/remote\/index.htm#$linkid\">Far plateau area index and description</a></li>\n";
}
if ($area =~ /7/) {
print FILE "<li><a href=\"$toroot\/egglgrub\/index.htm#$linkid\">Egglgrube area index and description</a></li>\n";