Changeset 9122
- Timestamp:
- 2005-02-21T17:23:29+13:00 (19 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/perllib/plugins/RecPlug.pm
r8737 r9122 309 309 $extrakey_dir =~ s/\\\./\./g; # remove RE syntax 310 310 311 my $dirsep = &util::get_dirsep();312 313 if ($ek =~ m/$dirsep /) { # specifies at least one directory311 my $dirsep_re = &util::get_re_dirsep(); 312 313 if ($ek =~ m/$dirsep_re/) { # specifies at least one directory 314 314 my $md = $extrametadata{$ek}; 315 315
Note:
See TracChangeset
for help on using the changeset viewer.