#!/bin/sh

set -e

if perl -MFile::DesktopEntry -MPath::Tiny -MFile::Which -MSet::Scalar -E 1 2>/dev/null; then
    /usr/share/flwm/generate-flwm-menu-from-desktop-files
fi

case "$1" in
triggered)
    exit 0
    ;;

*)
    # Remove (autogenerated) legacy menu files
    if [ -d /etc/X11/flwm/wmx ]; then
	rm -r /etc/X11/flwm/wmx
    fi

    inst=/etc/menu-methods/flwm

    if [ -f $inst ]; then
	chmod a+x $inst
    fi
    ;;
esac

#DEBHELPER#

exit 0
