#! /usr/bin/perl


$action = $ARGV[0];

if ($action eq "upgrade") {
	if ( -e "/usr/lib/netscape/netscape" ) {
		print "- Attempting to re-use already installed external files\n";
		exit 0;
	}
}

if ($action eq "deconfigure") {
	# nothing to be done
	exit 0;
}


#
# Remove other files files
#
unlink '/usr/doc/netscape/Version-==VERSION==';
unlink '/usr/lib/menu/==PACKAGE==';
unlink '/usr/lib/netscape/README';
unlink '/usr/lib/netscape/LICENSE';
unlink '/usr/lib/netscape/netscape';
rmdir '/usr/local/lib/netscape';
system 'rm -rf /usr/lib/netscape/.netscape/*';
if (-r "/usr/lib/netscape/.manifest") {
	system 'cd /usr/lib/netscape; rm -f `cat .manifest`';
	system 'rm -f /usr/lib/netscape/.manifest';
	system 'find /usr/lib/netscape -depth -type d -exec rmdir {} \; >/dev/null 2>&1';
}


#
# Remaining prerm stuff
#
if (-x "/usr/bin/update-menus") {
    system "/usr/bin/update-menus";
}
