Index: trunk/Nebulous-Server/t/75_parse_neb_key.t
===================================================================
--- trunk/Nebulous-Server/t/75_parse_neb_key.t	(revision 16203)
+++ trunk/Nebulous-Server/t/75_parse_neb_key.t	(revision 16205)
@@ -3,5 +3,5 @@
 # Copryight (C) 2004-2005  Joshua Hoblitt
 #
-# $Id: 75_parse_neb_key.t,v 1.1 2008-01-23 22:27:51 jhoblitt Exp $
+# $Id: 75_parse_neb_key.t,v 1.2 2008-01-23 22:46:44 jhoblitt Exp $
 
 use strict;
@@ -24,5 +24,5 @@
 # key
 {
-    my ($path, $volume) = parse_neb_key('foo/bar/baz/quix');
+    my ($volume, $path) = parse_neb_key('foo/bar/baz/quix');
 
     is($path, 'foo/bar/baz/quix', 'path');
@@ -31,5 +31,5 @@
 
 {
-    my ($path, $volume) = parse_neb_key('/foo/bar/baz/quix');
+    my ($volume, $path) = parse_neb_key('/foo/bar/baz/quix');
 
     is($path, 'foo/bar/baz/quix', 'path');
@@ -38,5 +38,5 @@
 
 {
-    my ($path, $volume) = parse_neb_key('//foo/bar/baz/quix');
+    my ($volume, $path) = parse_neb_key('//foo/bar/baz/quix');
 
     is($path, 'foo/bar/baz/quix', 'path');
@@ -45,5 +45,5 @@
 
 {
-    my ($path, $volume) = parse_neb_key('///foo/bar/baz/quix');
+    my ($volume, $path) = parse_neb_key('///foo/bar/baz/quix');
 
     is($path, 'foo/bar/baz/quix', 'path');
@@ -52,5 +52,5 @@
 
 {
-    my ($path, $volume) = parse_neb_key('foo////bar/baz/quix');
+    my ($volume, $path) = parse_neb_key('foo////bar/baz/quix');
 
     is($path, 'foo/bar/baz/quix', 'path');
@@ -59,5 +59,5 @@
 
 {
-    my ($path, $volume) = parse_neb_key('foo/bar/baz/quix/');
+    my ($volume, $path) = parse_neb_key('foo/bar/baz/quix/');
 
     is($path, 'foo/bar/baz/quix', 'path');
@@ -68,5 +68,5 @@
 # URI w/ volume name
 {
-    my ($path, $volume) = parse_neb_key('neb://foo/bar/baz/quix');
+    my ($volume, $path) = parse_neb_key('neb://foo/bar/baz/quix');
 
     is($path, 'bar/baz/quix', 'path');
@@ -75,5 +75,5 @@
 
 {
-    my ($path, $volume) = parse_neb_key('neb://foo//bar/baz/quix');
+    my ($volume, $path) = parse_neb_key('neb://foo//bar/baz/quix');
 
     is($path, 'bar/baz/quix', 'path');
@@ -82,5 +82,5 @@
 
 {
-    my ($path, $volume) = parse_neb_key('neb://foo///bar/baz/quix');
+    my ($volume, $path) = parse_neb_key('neb://foo///bar/baz/quix');
 
     is($path, 'bar/baz/quix', 'path');
@@ -89,5 +89,5 @@
 
 {
-    my ($path, $volume) = parse_neb_key('neb://foo/bar///baz/quix');
+    my ($volume, $path) = parse_neb_key('neb://foo/bar///baz/quix');
 
     is($path, 'bar/baz/quix', 'path');
@@ -96,5 +96,5 @@
 
 {
-    my ($path, $volume) = parse_neb_key('neb://foo/bar/baz/quix/');
+    my ($volume, $path) = parse_neb_key('neb://foo/bar/baz/quix/');
 
     is($path, 'bar/baz/quix', 'path');
@@ -106,5 +106,5 @@
 
 {
-    my ($path, $volume) = parse_neb_key('neb:/foo/bar/baz/quix');
+    my ($volume, $path) = parse_neb_key('neb:/foo/bar/baz/quix');
 
     is($path, 'foo/bar/baz/quix', 'path');
@@ -113,5 +113,5 @@
 
 {
-    my ($path, $volume) = parse_neb_key('neb:///foo/bar/baz/quix');
+    my ($volume, $path) = parse_neb_key('neb:///foo/bar/baz/quix');
 
     is($volume, undef, 'volume name');
@@ -120,5 +120,5 @@
 
 {
-    my ($path, $volume) = parse_neb_key('neb://///foo/bar/baz/quix');
+    my ($volume, $path) = parse_neb_key('neb://///foo/bar/baz/quix');
 
     is($path, 'foo/bar/baz/quix', 'path');
@@ -166,5 +166,5 @@
 # URI w/o volume requires leading slash
 eval {
-    my ($path, $volume) = parse_neb_key('neb:foo/bar/baz/quix');
+    my ($volume, $path) = parse_neb_key('neb:foo/bar/baz/quix');
 };
 like( $@, qr/requires a leading slash/, "leading slash" );