From ddf4a47f8f0714c1b4f63d889e55f9d88729c3c7 Mon Sep 17 00:00:00 2001
From: einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Thu, 22 Feb 2007 22:49:52 +0000
Subject: Fixing bug 1665716

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

(limited to 'bin/admin.pl')

diff --git a/bin/admin.pl b/bin/admin.pl
index c93a24fc..0fa468cb 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 !/(\.\.?|^\.?)/, readdir TEMPLATEDIR;
 	closedir TEMPLATEDIR;
 
 	@allhtml = sort grep /\.html/, @all;
-- 
cgit v1.2.3