Imported from ../bash-2.0.tar.gz.

[platform/upstream/bash.git] / examples / functions / csh-compat

diff --git a/examples/functions/csh-compat b/examples/functions/csh-compat
index 8eaf754..a855eaf 100644 (file)
--- a/examples/functions/csh-compat
+++ b/examples/functions/csh-compat
@@ -1,27 +1,15 @@
 # C-shell compatabilty package.
 # setenv VAR VALUE
-function setenv () {
+function setenv ()
+{
   export $1="$2"
 }
 
-function unsetenv () {
+function unsetenv ()
+{
   unset $1
 }
 
-function alias () {
-  local name=$1
-  shift
-  local value="$*"
-
-  if [ "$name" = "" ]; then
-    builtin alias
-  elif [ "$value" = "" ]; then
-    builtin alias $name
-  else
-    builtin alias $name="$value"
-  fi
-}
-
 # Can't write foreach yet.  Need pattern matching, and a few extras.
 function foreach () {
 echo 'Can'\''t do `foreach'\'' yet.  Type "help for".'
@@ -31,6 +19,29 @@ echo 'Can'\''t do `foreach'\'' yet.  Type "help for".'
 #set () {
 #}
 
-chdir () {
-  builtin cd $*
- }
+chdir ()
+{
+  builtin cd "$@"
+}
+
+# alias - convert csh alias commands to bash functions
+# from Mohit Aron <aron@cs.rice.edu>
+# posted to usenet as <4i5p17$bnu@larry.rice.edu>
+function alias ()
+{
+       if [ "x$2" = "x" ] 
+       then
+               declare -f $1
+       else
+               echo $2 | egrep -s '(\!|#)' 2>/dev/null
+               if [ $? -eq 0 ]
+               then
+                       comm=$(echo $2 | sed  's/\\!\*/\"$\@\"/g
+                                              s/\\!:\([1-9]\)/\"$\1\"/g
+                                              s/#/\\#/g')
+               else
+                       comm="$2 \"\$@\""
+               fi
+               eval function $1 \(\) "{" command "$comm"  "; }"
+       fi
+}