Ignore:
Timestamp:
2001-11-05T16:31:17+13:00 (23 years ago)
Author:
sjboddie
Message:

* empty log message *

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/gsdl/perllib/plugins/RecPlug.pm

    r2813 r2818  
    256256        my ($filespec, $mdref);
    257257        foreach $filespec (@extrametakeys) {
    258         if ($subfile =~ /$filespec/) {
     258        if ($subfile =~ /^$filespec$/) {
    259259            print $outhandle "File \"$subfile\" matches filespec \"$filespec\"\n"
    260260            if ($verbosity > 2);
Note: See TracChangeset for help on using the changeset viewer.