#! /bin/sh -f
 
if [ "$DISPLAY"x = x ]; then
  echo 'sedit: APL ascii version not available'
  exit 1
# bin='cbin'                  #  CURSES  version
else
  bin='mbin'                  #  MOTIF   version
fi
 
p=`expr \
  ${0-.}'/' : '\(/\)[^/]*/$' \
  \| ${0-.}'/' : '\(.*[^/]\)//*[^/][^/]*//*$' \
  \| .`
 
if [ $p = "." ]
  then p=`pwd`
fi
 
$p/$bin/ibm/xeda   $@
