3
# Gnats installation script -- written by Brian White <bcwhite@pobox.com>
4
# (This was my very first attempt at learning perl... please forgive me!)
6
# Forgiving -- rewritten to bash :-) by Milan Zamazal <pdm@debian.org>.
7
# ...and streamlined with SED by Chad Walstrom <chewie@debian.org>
11
###############################################################################
16
# Call arguments and never return error
17
function protect () { "$@" || true; }
19
###############################################################################
21
# Common initialization for install scripts
24
. /usr/share/debconf/confmodule
26
protect db_get gnats/site
27
SITE=${RET:-@DEFSITE@}
29
###############################################################################
34
if [ "$1" = purge ] ; then
37
# Remove the 'gnats' system from mail
39
if [ -f @MAILFILE@ ] ; then
41
OLDMAILFILE=@MAILFILE@.dpkg-old
43
sed 's/^[ \t]*\(gnats-admin\|bugs\|query-pr\|$SITE-gnats\)\>\(.*\)$/#\1\2/' \
45
cp @MAILFILE@ $OLDMAILFILE
47
mv $TEMPFILE @MAILFILE@
51
# Remove symlinks to databases
53
protect rm -f @DB_CONFIG_DIR@/*
57
###############################################################################
59
# Automatically added debhelper stuff