[svk-commit] r3084 - trunk/lib/SVK

[nobody at bestpractical.com]

Author: clsung
Date: Tue Sep  9 11:12:39 2008
New Revision: 3084

Modified:
   trunk/lib/SVK/Project.pm

Log:
- avoid some warnings 

Modified: trunk/lib/SVK/Project.pm
==============================================================================
--- trunk/lib/SVK/Project.pm	(original)
+++ trunk/lib/SVK/Project.pm	Tue Sep  9 11:12:39 2008
@@ -223,8 +223,8 @@
 #	    map { $_ => '/'.$allprops->{'svk:project:'.$project_name.':'.$_} }
 	    map {
 		my $prop = $allprops->{'svk:project:'.$project_name.':'.$_};
-		$prop =~ s{/$}{};
-		$prop =~ s{^/}{};
+		$prop =~ s{/$}{} if $prop;
+		$prop =~ s{^/}{} if $prop;
 		$_ => $prop ? $prop_path.'/'.$prop : '' }
 		('path-trunk', 'path-branches', 'path-tags');