[qmail] / debian / postrm

#!/usr/bin/perl

$| = 1;

$action = shift @ARGV;

if ( $action eq 'purge' ) {
    system('update-rc.d qmail remove >/dev/null');
    system("rm -rf /var/qmail");
    system("rm -rf /etc/qmail");
    exit $?;
}

if ( $action eq 'abort-install' ) {
    # Put back old inetd.conf (?)
    exit 0
}
Commit	Line	Data
9312c29d MW	1	#!/usr/bin/perl
	2
	3	$\| = 1;
	4
	5	$action = shift @ARGV;
	6
	7	if ( $action eq 'purge' ) {
	8	system('update-rc.d qmail remove >/dev/null');
	9	system("rm -rf /var/qmail");
	10	system("rm -rf /etc/qmail");
	11	exit $?;
	12	}
	13
	14	if ( $action eq 'abort-install' ) {
	15	# Put back old inetd.conf (?)
	16	exit 0
	17	}
	18