Changeset 17668

Timestamp:

May 13, 2008, 4:06:37 PM (18 years ago)

Author:

jhoblitt

Message:

remove stripping of schema from nebulous URIs

File:

• trunk/PS-IPP-Config/lib/PS/IPP/Config.pm (modified) (7 diffs)

trunk/PS-IPP-Config/lib/PS/IPP/Config.pm

@@ -1 +1 @@
 # Copyright (c) 2006  Paul Price, Joshua Hoblitt
 #
-# $Id: Config.pm,v 1.85 2008-05-14 02:06:02 jhoblitt Exp $
+# $Id: Config.pm,v 1.86 2008-05-14 02:06:37 jhoblitt Exp $
 
 package PS::IPP::Config;
@@ -372 +372 @@
 
     if ($scheme eq 'neb') {
-        $name =~ s|^neb:/*||;
         $self->_neb_start();
         my $neb = $self->{nebulous}; # Nebulous handle
@@ -405 +404 @@
         $scheme = lc($scheme);
         if ($scheme eq 'neb') {
-            $name =~ s|^neb:/*||;
             $self->_neb_start();
             return $self->{nebulous}->open_create( $name );
@@ -440 +438 @@
         $scheme = lc($scheme);
         if ($scheme eq 'neb') {
-            $name =~ s|^neb:/*||;
             $self->_neb_start();
             return $self->{nebulous}->open_create( $name );
@@ -468 +465 @@
     my $scheme = file_scheme($name); # The scheme, e.g., file://, path://
     if (defined $scheme and lc($scheme) eq 'neb') {
-        $name =~ s|^neb:/*||;
         $self->_neb_start();
         $name = $self->{nebulous}->create( $name );
@@ -484 +480 @@
     my $scheme = file_scheme($name); # The scheme, e.g., file://, path://
     if (defined $scheme and lc($scheme) eq 'neb') {
-        $name =~ s|^neb:/*||;
         $self->_neb_start();
         return (defined $self->{nebulous}->find_instances( $name ) ? 1 : 0);
@@ -503 +498 @@
     my $scheme = file_scheme($target); # The scheme, e.g., file://, path://
     if (defined $scheme and lc($scheme) eq 'neb') {
-        $target =~ s|^neb:/*||;
         $self->_neb_start();
         $target = $self->{nebulous}->create( $target );