if [ "$(dpkg-query -W -f '${Status}' debathena-xsession 2>/dev/null)" = "install ok installed" ] && [ "$DEBATHENA_HOME_TYPE" = "afs" ]; then
    QUOTAPCT=$(fs lq $HOME | tail -1 | awk '{print $4}' | sed 's/[^0-9]*//g')
    if [ $QUOTAPCT -ge 100 ]; then
	message "You have exceeded your AFS quota.  This login session will likely fail.\n\nTry using the 'Athena TTY Session' login session to get a tty-mode login session, and then remove or compress some files to get below your quota.\n\nYou may also request a quota increase from User Accounts by calling x3-1325."
    fi
fi
