Changeset 12961 for trunk/Nebulous/lib/Nebulous/Util.pm

Timestamp:

Apr 23, 2007, 10:45:08 AM (19 years ago)

Author:

jhoblitt

Message:

change API to generally return true URIs instead of file paths
add support for some what intelligent volume allocations

File:

• trunk/Nebulous/lib/Nebulous/Util.pm (modified) (3 diffs)

trunk/Nebulous/lib/Nebulous/Util.pm

@@ -1 +1 @@
 # Copyright (c) 2004  Joshua Hoblitt
 #
-# $Id: Util.pm,v 1.3 2005-06-30 02:35:06 jhoblitt Exp $
+# $Id: Util.pm,v 1.4 2007-04-23 20:45:08 jhoblitt Exp $
 
 package Nebulous::Util;
@@ -14 +14 @@
 use Log::Log4perl qw( :levels );
 use URI;
+use URI::file;
 
 my @symbols = qw(
@@ -71 +72 @@
     my ( $uri , $flags ) = @_;
 
-    my $path = _get_file_path( $uri );
-    my $fh = _get_filehandle( $path, $flags );
+    $uri = URI->new("$uri");
+
+    my $fh = _get_filehandle($uri->file, $flags);
 
     return $fh;