#!/bin/sh
repocop-sqlite "$REPOCOP_TEST_DBDIR/rpm.db" "select distinct a.pkgid FROM rpm_obsoletes as a, rpm as b WHERE a.pkgid=b.pkgid AND b.name = a.obsoletename AND (obsoleteversion='' OR obsoleteversion IS NULL OR rpm_compare_op_evr_e_v_r(obsoleteFLAG,obsoleteversion,epoch,version,release)>0);" | \
perl -ne 'chomp;@a=split /\t/;system(qw/repocop-test-warn -k/,$a[0], "The package obsoletes itself. Must be an error in spec file. Please provide Obsoletes: with the valid value.")'
#rm $REPOCOP_TEST_TMPDIR/*
