Changeset 16354 for trunk/Nebulous-Server/lib/Nebulous/Server.pm

Timestamp:

Feb 7, 2008, 12:18:51 PM (18 years ago)

Author:

jhoblitt

Message:

pickup test DB settings from the env.

File:

• trunk/Nebulous-Server/lib/Nebulous/Server.pm (modified) (2 diffs)

trunk/Nebulous-Server/lib/Nebulous/Server.pm

@@ -1 +1 @@
 # Copyright (c) 2004  Joshua Hoblitt
 #
-# $Id: Server.pm,v 1.51 2008-01-31 02:26:33 jhoblitt Exp $
+# $Id: Server.pm,v 1.52 2008-02-07 22:18:51 jhoblitt Exp $
 
 package Nebulous::Server;
@@ -861 +861 @@
     $log->debug( "entered - @_" );
 
+    unless ($pattern) {
+        $log->debug( "leaving" );
+        return [];
+    }
+
+    # attempt to strip off neb:// if it exists
+    if ($pattern =~ m|^neb:|) {
+        $pattern = parse_neb_key($pattern);        
+    }
+
     my $query;
-
     eval {
         $query = $db->prepare_cached( $sql->find_objects );