[netfilter-cvslog] r3241 - trunk/patch-o-matic-ng

[/C=DE/ST=Berlin/L=Berlin/O=Netfilter]

Author: /C=DE/ST=Berlin/L=Berlin/O=Netfilter Project/OU=Development/CN=laforge/emailAddress=laforge at netfilter.org
Date: 2004-10-20 16:52:06 +0200 (Wed, 20 Oct 2004)
New Revision: 3241

Modified:
   trunk/patch-o-matic-ng/Netfilter_POM.pm
Log:
make it work with subversion


Modified: trunk/patch-o-matic-ng/Netfilter_POM.pm
===================================================================
--- trunk/patch-o-matic-ng/Netfilter_POM.pm	2004-10-20 14:49:56 UTC (rev 3240)
+++ trunk/patch-o-matic-ng/Netfilter_POM.pm	2004-10-20 14:52:06 UTC (rev 3241)
@@ -6,7 +6,7 @@
 #
 # This code is subject to the GNU GPLv2
 #
-# $Id: Netfilter_POM.pm,v 1.32 2004/06/27 01:15:16 kadlec Exp $
+# $Id$
 #
 # The idea is to have the backend seperated from the frontend.  Thus,
 # other frontends (like ncurses,...) could potentially be implemented on
@@ -379,7 +379,7 @@
 	opendir(DIR, $dir)
 		or croak "can't open directory $dir: $!";
 	# Don't miss .foo-test files!
-	my @dents = sort grep {!/^(\.\.?|CVS)$/} readdir(DIR);
+	my @dents = sort grep {!/^(\.\.?|CVS|\.svn)$/} readdir(DIR);
 	closedir(DIR);
 	foreach my $dent (@dents) {
 		my $fullpath = "$dir/$dent";