From c86312f33fa30bdc31e617bb3a3ff0b36c72ed15 Mon Sep 17 00:00:00 2001 From: Lutz Kettner Date: Thu, 8 May 1997 00:49:11 +0000 Subject: [PATCH] Initial revision --- Packages/Manual_tools/src/cc_patch_anchor_filter | 5 +++++ Packages/Manual_tools/src/cc_patch_anchor_pages | 10 ++++++++++ Packages/Manual_tools/src/cc_patch_anchor_toc_index | 5 +++++ 3 files changed, 20 insertions(+) create mode 100755 Packages/Manual_tools/src/cc_patch_anchor_filter create mode 100755 Packages/Manual_tools/src/cc_patch_anchor_pages create mode 100755 Packages/Manual_tools/src/cc_patch_anchor_toc_index diff --git a/Packages/Manual_tools/src/cc_patch_anchor_filter b/Packages/Manual_tools/src/cc_patch_anchor_filter new file mode 100755 index 00000000000..1eb7be8bcfe --- /dev/null +++ b/Packages/Manual_tools/src/cc_patch_anchor_filter @@ -0,0 +1,5 @@ +#!/usr/local/bin/perl -pi + +# Patch the links in the anchor translator to achieve crosslinks between +# the different directories. +s/()/$1$ENV{CC__LOC_F}$2/g; diff --git a/Packages/Manual_tools/src/cc_patch_anchor_pages b/Packages/Manual_tools/src/cc_patch_anchor_pages new file mode 100755 index 00000000000..2aaf5916838 --- /dev/null +++ b/Packages/Manual_tools/src/cc_patch_anchor_pages @@ -0,0 +1,10 @@ +#!/usr/local/bin/perl -pi + +# Patch the links to the main pages (like contents) in the local pages. +s/()/$1..\/$2/g; +s/()/$1..\/$2/g; +s/()/$1..\/$2/g; +s/()/$1..\/$2/g; +s/()/$1..\/$2/g; +s/(SRC=[\"])([^\/\"]*[.]gif[\"])/$1..\/$2/g; + diff --git a/Packages/Manual_tools/src/cc_patch_anchor_toc_index b/Packages/Manual_tools/src/cc_patch_anchor_toc_index new file mode 100755 index 00000000000..dcae868eaba --- /dev/null +++ b/Packages/Manual_tools/src/cc_patch_anchor_toc_index @@ -0,0 +1,5 @@ +#!/usr/local/bin/perl -pi + +# Patch the links from the main pages (like contents) to the local pages. +s/()/$1$ENV{CC__LOC_F}$2/g; +