#! /bin/sh
# $Id$

if [ $# -ge 2 ];then
	echo >&2 "Syntax: $0 [<diff>]"
	exit 1
fi

prog='print if !/^[?]/ && !/^Index:/ && !/^={67}$/ && !/^RCS file:/ && !/^retrieving revision / && !/^diff -/;'
if [ $# -eq 1 ];then
	exec perl -ne "$prog" -i "$1"
else
	exec perl -ne "$prog"
fi