bin/diffdecvs

   1 #! /bin/sh
   2 # $Id$
   3
   4 if [ $# -ge 2 ];then
   5         echo >&2 "Syntax: $0 [<diff>]"
   6         exit 1
   7 fi
   8
   9 prog='print if !/^Index:/ && !/^={67}$/ && !/^RCS file:/ && !/^retrieving revision / && !/^diff -/;'
  10 if [ $# -eq 1 ];then
  11         exec perl -ne "$prog" -i "$1"
  12 else
  13         exec perl -ne "$prog"
  14 fi