From 09c348bef2f7812c506f713237d275fbe69fcd35 Mon Sep 17 00:00:00 2001
From: axel <axel@liljencrantz.se>
Date: Sat, 28 Oct 2006 08:50:04 +1000
Subject: [PATCH] Add a shellscript function 'save'function' for saving the
 current definition of a function to file

darcs-hash:20061027225004-ac50b-2454152687ff84deec90e3d938a0288e62dc34e6.gz
---
 share/functions/save_function.fish | 32 ++++++++++++++++++++++++++++++
 1 file changed, 32 insertions(+)
 create mode 100644 share/functions/save_function.fish

diff --git a/share/functions/save_function.fish b/share/functions/save_function.fish
new file mode 100644
index 000000000..62f7a9ea4
--- /dev/null
+++ b/share/functions/save_function.fish
@@ -0,0 +1,32 @@
+
+function save_function -d (N_ "Save the current definition of all specified functions to file")
+
+	set -l res 0
+
+	set -l configdir ~/.config
+	if set -q XDG_CONFIG_HOME
+		set configdir $XDG_CONFIG_HOME
+	end
+
+	for i in $configdir $configdir/fish $configdir/fish/functions
+		if not test -d 
+			if not builtin mkdir $configdir >/dev/null
+				printf (_ "%s: Could not create configuration directory\n") save_function
+				return 1
+			end
+		end
+	end
+
+	for i in $argv
+		if functions -q $i
+			functions $i > $configdir/fish/functions/$i.fish
+			functions -e $i
+		else
+			printf (_ "%s: Unknown function '%s'\n") save_function $i
+			set res 1
+		end
+	end
+
+	return $res
+end
+