moved core files to new dir structurev2.0_alpha1

git-svn-id: svn://svn.alpinelinux.org/acf/core/trunk@219 ab2d0c66-481e-0410-8bed-d214d4d58bed

1 files changed, 25 insertions, 0 deletions

diff --git a/lib/join.lua b/lib/join.lua
new file mode 100644
index 0000000..e3621de
--- /dev/null
+++ b/lib/join.lua
@@ -0,0 +1,25 @@
+--[[
+	module for joining an array to a string
+]]--
+
+module (..., package.seeall)
+
+
+-- This code comes from http://lua-users.org/wiki/SplitJoin
+--
+-- Concat the contents of the parameter list,
+-- -- separated by the string delimiter (just like in perl)
+-- -- example: strjoin(", ", {"Anna", "Bob", "Charlie", "Dolores"})
+return function (delimiter, list)
+	local len = getn(list)
+	if len == 0 then 
+		return "" 
+	end
+	local string = list[1]
+	for i = 2, len do 
+		string = string .. delimiter .. list[i] 
+	end
+	return string
+end
+
+