Changeset 9122

Timestamp:

2005-02-21T17:23:29+13:00 (19 years ago)

Author:

mdewsnip

Message:

Grrr... why doesn't anyone think about Windows when writing code?

File:

• trunk/gsdl/perllib/plugins/RecPlug.pm (modified) (1 diff)

trunk/gsdl/perllib/plugins/RecPlug.pm

@@ -309 +309 @@
     $extrakey_dir =~ s/\\\./\./g; # remove RE syntax
 
-    my $dirsep = &util::get_dirsep();
-
-    if ($ek =~ m/$dirsep/) { # specifies at least one directory
+    my $dirsep_re = &util::get_re_dirsep();
+
+    if ($ek =~ m/$dirsep_re/) { # specifies at least one directory
         my $md = $extrametadata{$ek};