#!/bin/ash -eu
# -*- mode: Ksh; tab-width: 8; fill-column: 70; -*- 
# $Id: dups,v 0.0.1 2006/03/13 18:12:26 legion Exp $ 

TEST=
verbose=-v

indir="$(readlink -ve "$1")"
cd "$indir"
for n in `ls -1 |grep ".src.rpm\$" |cut -c1 |LC_COLLATE=C sort -u`; do
    rpmrdups "$n"*.src.rpm | cut -d\  -f2- | tr \  \\n | xargs -r $TEST rm $verbose -f --
done
