Initial revision

This commit is contained in:
Lutz Kettner 1997-05-08 00:49:11 +00:00
parent ed69838c0e
commit c86312f33f
3 changed files with 20 additions and 0 deletions

View File

@ -0,0 +1,5 @@
#!/usr/local/bin/perl -pi
# Patch the links in the anchor translator to achieve crosslinks between
# the different directories.
s/(<A HREF=[\\][\"])([^\/\"]*[\\][\"]>)/$1$ENV{CC__LOC_F}$2/g;

View File

@ -0,0 +1,10 @@
#!/usr/local/bin/perl -pi
# Patch the links to the main pages (like contents) in the local pages.
s/(<A HREF=[\"])(contents[.]html[\"]>)/$1..\/$2/g;
s/(<A HREF=[\"])(biblio[.]html[\"]>)/$1..\/$2/g;
s/(<A HREF=[\"])(manual_index[.]html[\"]>)/$1..\/$2/g;
s/(<A HREF=[\"])(title[.]html[\"]>)/$1..\/$2/g;
s/(<A HREF=[\"])(biblio[.]html#[^\"]*[\"]>)/$1..\/$2/g;
s/(SRC=[\"])([^\/\"]*[.]gif[\"])/$1..\/$2/g;

View File

@ -0,0 +1,5 @@
#!/usr/local/bin/perl -pi
# Patch the links from the main pages (like contents) to the local pages.
s/(<A HREF=[\"])([^\/\"]*[\"]>)/$1$ENV{CC__LOC_F}$2/g;