Changeset 300

Timestamp:

02/10/2007 08:08:12 PM

Author:

luedi

Message:

in the label handler the label can be empty. This happens if the label was removed later. Protect uninitialized value in substitution warning

Files:

• trunk/script/Vss2Svn/Dumpfile.pm (modified) (2 diffs)

trunk/script/Vss2Svn/Dumpfile.pm

@@ -553 +553 @@
-
-    my $label = $data->{info};
-    $label =~ s:/:_:g;
-
-    # It is possible that the label was deleted later, so we see here a label
@@ -560 +559 @@
-    # as a valid share source.
-    if (defined ($label)) {
+        $label =~ s:/:_:g;
+    
-        my $vssitempath = $itempath;
-        $vssitempath =~ s/^$main::gCfg{trunkdir}//;