Changeset 2487

Timestamp:

02/14/09 00:26:57 (4 years ago)

Author:

SvenDowideit

Message:

Item1073: respect the unix . file and dir prefix - don't try loading them as Plugin modules - Also, they are not within the module name spec for Perl modules

File:

• trunk/core/lib/Foswiki/Configure/Types/SELECTCLASS.pm (modified) (2 diffs)

trunk/core/lib/Foswiki/Configure/Types/SELECTCLASS.pm

@@ -49 +49 @@
         foreach my $place (@$places) {
             if ( opendir( DIR, $place ) ) {
+                #next if ($place =~ /^\..*/);
                 foreach my $subplace ( readdir DIR ) {
                     next unless $subplace =~ $pathel;
+                    #next if ($subplace =~ /^\..*/);
                     push( @newplaces, $place . '/' . $1 );
                 }
@@ -66 +68 @@
             foreach my $file ( readdir DIR ) {
                 next unless $file =~ $leaf;
+                next if ($file =~ /^\..*/);
                 $file =~ /^(.*)\.pm$/;
                 my $module = "$place/$1";