Changeset 32131

Timestamp:

2018-02-13T11:21:47+13:00 (6 years ago)

Author:

kjdon

Message:

don't want the initial , if trying to match 41 times. this is a syntax error

File:

• main/trunk/greenstone2/perllib/plugins/DirectoryPlugin.pm (modified) (1 diff)

main/trunk/greenstone2/perllib/plugins/DirectoryPlugin.pm

@@ -197 +197 @@
     
     # check to see we haven't got a cyclic path...
-    if ($dirname =~ m%(/.*){,41}%) {
+    if ($dirname =~ m%(/.*){41}%) {
     print $outhandle "DirectoryPlugin: $dirname is 40 directories deep, is this a recursive path? if not increase constant in DirectoryPlugin.pm.\n";
     return 0;