From dc53423183a0c459284ebd139022b707f01af006 Mon Sep 17 00:00:00 2001
From: Natanael Copa <natanael.copa@gmail.com>
Date: Fri, 27 Jul 2007 12:53:38 +0000
Subject: moved core files to new dir structure

git-svn-id: svn://svn.alpinelinux.org/acf/core/trunk@219 ab2d0c66-481e-0410-8bed-d214d4d58bed
---
 lib/join.lua | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)
 create mode 100644 lib/join.lua

(limited to 'lib/join.lua')

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
+
+
-- 
cgit v1.2.3