#!/bin/sh -u
#
# Generate a self generating FVWM menu.
#	- Cameron Simpson <cs@zip.com.au> 18may2002
#

##alert "$0 $*"

noentries=
noauto=
title=

cmd=$0
usage="Usage: $cmd [-1] [-n] [-t title] menuname cmd [args...]
	-n	Don't geneate any menu entries (bootstrap).
	-t	Set title; default is menu name.
	-1	Don't give this menu a DynamicPopUpAction."

while [ $# -gt 0 ]
do
  case $1 in
    -n) noentries=1 ;;
    -t)	title=$2; shift ;;
    -1) noauto=1 ;;
    *)  break ;;
  esac
  shift
done

[ $# -ge 2 ] || { echo "$usage" >&2; exit 2; }

menu=$1
shift

[ -n "$title" ] || title=$menu

( [ $noentries ] || exec "$@" ) \
| ( echo "DestroyMenu $menu"
    echo "AddToMenu $menu \"$title\" Title"
    [ $noauto ] || echo "AddToMenu $menu DynamicPopUpAction Piperead '$0 -t \"$title\" $menu $*'"
    exec sed "s/^/AddToMenu $menu /"
  )