--- elwix/config/rc.subr	2011/07/05 23:43:00	1.1
+++ elwix/config/rc.subr	2011/10/18 09:02:06	1.2
@@ -4,7 +4,7 @@
 # (C) AITNET ltd - Sofia/Bulgaria <office@aitnet.org>
 #    by Michael Pounov <misho@elwix.org>
 #
-# $Id: rc.subr,v 1.1 2011/07/05 23:43:00 misho Exp $
+# $Id: rc.subr,v 1.2 2011/10/18 09:02:06 misho Exp $
 #
 
 ### Dont edit this file !!!
@@ -46,7 +46,7 @@ InstallList()
 
 # $1 = From dir
 # $2 = To dir
-InstallFiles()
+InstallDir()
 {
 	cd $1
 	pax -rw -pe -X . $2
@@ -57,4 +57,15 @@ InstallFiles()
 InstallProg()
 {
 	install -c $*
+}
+
+# $1 = file_pattern
+# $2 = To dir
+# $3 = From dir
+InstallFiles()
+{
+	cd $2
+	find . -type f -name "$1" | 
+		tar -cvf - -T - | tar -C $3 -xf -
+	cd -
 }