From 9959e539852784c1de25be7a616ef343edc66a58 Mon Sep 17 00:00:00 2001
From: axel <axel@liljencrantz.se>
Date: Wed, 8 Nov 2006 06:55:39 +1000
Subject: [PATCH] Add alias function. Thanks to Tassilo Horn for pointing out
 that it was missing.

darcs-hash:20061107205539-ac50b-0053f828d40be5bcb088cdb8d669c239c201b433.gz
---
 share/functions/alias.fish | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)
 create mode 100644 share/functions/alias.fish

diff --git a/share/functions/alias.fish b/share/functions/alias.fish
new file mode 100644
index 000000000..f07727959
--- /dev/null
+++ b/share/functions/alias.fish
@@ -0,0 +1,22 @@
+
+function alias -d (_ "Legacy function for creating shellscript functions using an alias-like syntax")
+	set -l name
+	set -l body
+	switch (count $argv)
+
+		case 1
+			set -l tmp (echo $argv|sed -e "s/\([^=]\)=/\1\n/")
+			set name $tmp[1]
+			set body $tmp[2]
+
+		case 2
+			set name $argv[1]
+			set body $argv[2]
+
+		case \*
+			printf ( _ "%s: Expected one or two arguments, got %d") alias (count $argv)
+			return 1
+	end
+
+	eval "function $name; $body \$argv; end"
+end