From b221bfd36b57e25b1ac470c302b028ba3a2e639e Mon Sep 17 00:00:00 2001
From: einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Thu, 22 Feb 2007 23:30:25 +0000
Subject: Correcting regex in admin.pl

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/branches/1.2@834 4979c152-3d1c-0410-bac9-87ea11338e46
---
 bin/admin.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'bin')

diff --git a/bin/admin.pl b/bin/admin.pl
index 0fa468cb..67cb2414 100755
--- a/bin/admin.pl
+++ b/bin/admin.pl
@@ -357,7 +357,7 @@ sub form_header {
 	}
 
 	opendir TEMPLATEDIR, "${LedgerSMB::Sysconfig::templates}/." or $form->error(__FILE__.':'.__LINE__.': '."$templates : $!");
-	@all = grep !/(\.\.?|^\.?)/, readdir TEMPLATEDIR;
+	@all = grep !/(^\.\.?$|^\.svn)/, readdir TEMPLATEDIR;
 	closedir TEMPLATEDIR;
 
 	@allhtml = sort grep /\.html/, @all;
-- 
cgit v1.2.3