summaryrefslogtreecommitdiff
path: root/Build/source/mswin32/fix-rman.pl
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2008-01-30 22:53:16 +0000
committerKarl Berry <karl@freefriends.org>2008-01-30 22:53:16 +0000
commit5b220dd618918fcba08d8a57a50ca22f637f2080 (patch)
treec57b1cadff663cb55d585011e58dcf6e2f81d37c /Build/source/mswin32/fix-rman.pl
parentcbadb342afed31e4056992d557544e1904e55827 (diff)
remove windows sources no longer used, per akira
git-svn-id: svn://tug.org/texlive/trunk@6454 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/mswin32/fix-rman.pl')
-rw-r--r--Build/source/mswin32/fix-rman.pl32
1 files changed, 0 insertions, 32 deletions
diff --git a/Build/source/mswin32/fix-rman.pl b/Build/source/mswin32/fix-rman.pl
deleted file mode 100644
index 29bb0179e32..00000000000
--- a/Build/source/mswin32/fix-rman.pl
+++ /dev/null
@@ -1,32 +0,0 @@
-#
-# Purpose: create cross references through pages translated
-# by Polyglottman.
-# Author: F. Popineau
-# Date : 10/10/98
-# Time-stamp: <03/05/16 00:28:07 popineau>
-#
-# Usage:
-# rman -f HTML -n file.man file.man | perl fix-rman.pl > file.html
-#
-
-require "newgetopt.pl";
-
-&main;
-
-exit 0;
-
-sub main {
-
- unless (&NGetOpt ("title=s")) {
- print STDERR "Usage: $0 --title=name\n";
- exit 1;
- }
-
- while (<>) {
- # lines to match : <B><A HREF="rman.c.rman.c">mktexmf</B>(1)</A>
- $_ =~ s/<TITLE>..man.c\(..man.c\) manual page<\/TITLE>/<TITLE>$opt_title manual page<\/TITLE>/ ;
- $_ =~ s/(.*)<A HREF="rman.c.rman.c">([A-z_0-9-]+)<\/B>\(1\)<\/A>(.*)/$1<A HREF="$2.html">$2<\/B>\(1\)<\/A>$3/ ;
- print $_;
- # $_ =~ s/(.*)<A HREF="rman.c.rman.c">([A-z_0-9-]+)<\/B>\(1\)<\/A>(.*)/ ;
- }
-}