  WINTITLE="Slideshow of files"
  export WINTITLE

     WIN_GEOM="+40+40"
     export WIN_GEOM

  WIN_INFO="\
Some information on how the calling utility works would go here.
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
"
  export WIN_INFO

#  export HOST_ID

  DIRNAME=$HOME
  export DIRNAME

  DIRWIDTH=0
  export DIRWIDTH

  STRING="*.gif"
  export STRING

     STRING_LABEL="File mask (like *.txt):"
     export STRING_LABEL

  OPTMENU_LABEL="Options Label:"
  OPTMENU_LIST="opt1 opt2 opt3"
  OPTvalue="opt2"
  OPTvalWIDTH="5"
  export OPTMENU_LABEL OPTMENU_LIST OPTvalue OPTvalWIDTH

  FEDIR=/apps/nns_com/fea

# set -x

  TEMP=`$FEDIR/tkGUIs/enter_dir_string_optmenu_toghelp-scroll.tk`

# TEMP=`$FEDIR/tkGUIs/enter_dir_string_optmenu_toghelp-scroll.tk_NEW`

# set -

#  eval "$TEMP"

echo "$TEMP"
