#!/bin/sh
#########################################################
# gswm_menu  (c) Martin Brecher
# http://www.stupid-design.com/martin/GNUstep/
#
# Released under the terms of the General Public License
#########################################################


GNUSTEP_ROOT=
GNUSTEP_USER_ROOT=~/GNUstep



echo "\"GNUstep Applications\" MENU"

# check System, Local, Network first:

for a in `ls $GNUSTEP_ROOT/`; do
    if test -d "$GNUSTEP_ROOT/$a/Applications/"; then
        if ! test -z "`ls $GNUSTEP_ROOT/$a/Applications/`";  then
            echo "    \"$a\" MENU"
	        for i in `ls $GNUSTEP_ROOT/$a/Applications/`; do
		     echo "        \"$i\" EXEC \"openapp $i\" " 
	        done;
             echo "    \"$a\" END"
         fi;
    fi;
done;



# check user's private Apps folder:

if test -d "$GNUSTEP_USER_ROOT/Applications/";  then
    if ! test -z "`ls $GNUSTEP_USER_ROOT/Applications/`";  then
	echo "    \"Personal\" MENU"
  	    for i in `ls $GNUSTEP_USER_ROOT/Applications/`; do
		echo "        \"$i\" EXEC \"openapp $i\" " 
	    done;
	echo "    \"Personal\" END"
    fi;
fi;


echo "\"GNUstep Apps\" END"