summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/source/latex/stex/bin/grep-rerun
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/source/latex/stex/bin/grep-rerun')
-rwxr-xr-xMaster/texmf-dist/source/latex/stex/bin/grep-rerun59
1 files changed, 0 insertions, 59 deletions
diff --git a/Master/texmf-dist/source/latex/stex/bin/grep-rerun b/Master/texmf-dist/source/latex/stex/bin/grep-rerun
deleted file mode 100755
index f73ef082fbb..00000000000
--- a/Master/texmf-dist/source/latex/stex/bin/grep-rerun
+++ /dev/null
@@ -1,59 +0,0 @@
-#!/usr/bin/perl -w
-#######################################################################################
-# A tool for updating .dtx files with a correspodning checksum counter #
-# Copyright (c) 2010, Deyan Ginev, released under the Gnu General Public License (GPL)#
-# see http://www.gnu.org/copyleft/gpl.html #
-# $URL: https://svn.kwarc.info/repos/stex/trunk/bin/gre-rerun$ #
-#######################################################################################
-
-use strict;
-
-use Getopt::Long;
-use Pod::Usage;
-use File::Spec;
-use Cwd qw(abs_path);
-
-####### start of program #######
-my ($errlog,$pattern)=@ARGV;
-my %rerun_set = ();
-open(IN,"<",$errlog);
-my ($errvol,$errdir)=File::Spec->splitpath($errlog);
-my $currpath=abs_path($errdir);
-while (<IN>) {
- #Entering, update path
- if (/^Entering (.+)$/) {
- $currpath.="/$1";
- }
- #Leaving, update path
- elsif (/^Leaving (.+)$/) {
- $currpath =~ s/(\/$1)$//;
- }
- #Matching error, note source
- elsif (/$pattern/) {
- my ($name) = split(/:/,$_);
- ($name) = split(/\./,$name);
- $rerun_set{$currpath."/".$name.".tex"}=1;
- }
-}
-#Perform rerun of affected sources:
-print STDERR scalar(keys %rerun_set)." sources to rerun:\n";
-foreach (sort keys %rerun_set) {
- my ($vol,$dir,$file) = File::Spec->splitpath( $_ );
- print STDERR "Trying $_\n";
- $file=~s/\.tex$/.omdoc/;
- print STDERR `cd $dir; make $file -B`;
-}
-close(IN);
-
-
-__END__
-
-
-=head1 SYNOPSIS
-
-grep-rerun <errlog filename> <grep pattern>
-
-Purpose:
- Given an error log file, generated via the sTeX Makefiles, and an error pattern, fetches and reconverts all sources that suffered this error.
-Example:
- grep-rerun latex.errlog "Fatal:"