[Bps-public-commit] r15273 - in Prophet/trunk: .

[sartak at bestpractical.com]

Author: sartak
Date: Wed Aug 20 04:29:09 2008
New Revision: 15273

Modified:
   Prophet/trunk/   (props changed)
   Prophet/trunk/lib/Prophet/Replica.pm

Log:
 r69840 at onn:  sartak | 2008-08-20 04:29:01 -0400
 Fix the split of replica type and URL


Modified: Prophet/trunk/lib/Prophet/Replica.pm
==============================================================================
--- Prophet/trunk/lib/Prophet/Replica.pm	(original)
+++ Prophet/trunk/lib/Prophet/Replica.pm	Wed Aug 20 04:29:09 2008
@@ -127,7 +127,8 @@
     my $self = shift;
     my $url  = shift;
 
-    my ($scheme, $real_url) = split /:/, $url;
+    my ($scheme, $real_url) = $url =~ /^([^:]*):(.*)$/;
+
     my $type_map = $Prophet::Replica::REPLICA_TYPE_MAP->{$scheme};
     $real_url = $url if $type_map->{keep_scheme};