#!/bin/ksh
#	csh-compat-for-ksh - file to make ksh able to do csh things

#  Henry Grebler     3 Apr 95  Fix aliases.
#  Henry Grebler    24 May 94  Make 'kshalias' an alias for 'alias' here.

function setenv {
  export $1="$2"
}

function unsetenv {
  unset $1
}

function source {
  . $1
}

function kshalias {
	if [ "$1" != "" ]
	then
		typeset name=$1
		shift
		typeset value="$*"
	fi

  if [ "$name" = "" ]; then
    \alias
  elif [ "$value" = "" ]; then
    \alias $name
  else
    \alias $name="$value"
  fi
}

alias alias=kshalias

# Can't write foreach yet.  Need pattern matching, and a few extras.
function foreach {
echo 'Can'\''t do `foreach'\'' yet.  Type "help for".'
}
