#!/bin/sh

# $Id: patindex.SH 1 2006-08-24 12:32:52Z rmanfredi $
#
#  Copyright (c) 1991-1997, 2004-2006, Raphael Manfredi
#  
#  You may redistribute only under the terms of the Artistic Licence,
#  as specified in the README file that comes with the distribution.
#  You may reuse parts of this distribution only within the terms of
#  that same Artistic Licence; a copy of which may be found at the root
#  of the source tree for dist 4.0.
#
# Original Author: Larry Wall <lwall@netlabs.com>
#
# $Log: patindex.SH,v $
# Revision 3.0.1.1  1993/08/19  06:42:37  ram
# patch1: leading config.sh searching was not aborting properly
#
# Revision 3.0  1993/08/18  12:10:44  ram
# Baseline for dist 3.0 netwide release.
#

zcat='/usr/bin/zcat'
test='test'
sed='/usr/bin/sed'
grep='/usr/bin/grep'

if test -d bugs; then
	cd bugs
fi
for i in patch? patch??; do
	if $test -f $i; then
		echo "=== $i ==="
		$grep '^Subject: ' $i | $sed 's/^patch\(.*\):Subject/\1/'
	fi
done
for i in patch?.Z patch??.Z; do
	if $test -f $i; then
		name=`echo $i | $sed "s|\.Z$||"`
		echo "=== $name ==="
		$zcat $i | $grep '^Subject: ' | $sed 's/^patch\(.*\):Subject/\1/'
	fi
done