Changeset 13297

Timestamp:

May 7, 2007, 11:03:10 AM (19 years ago)

Author:

Paul Price

Message:

Only load Nebulous::Client when required.

File:

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

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

@@ -1 +1 @@
 # Copyright (c) 2006  Paul Price, Joshua Hoblitt
 #
-# $Id: Config.pm,v 1.43 2007-05-05 02:52:28 price Exp $
+# $Id: Config.pm,v 1.44 2007-05-07 21:03:10 price Exp $
 
 package PS::IPP::Config;
@@ -16 +16 @@
 use Getopt::Long 2.35 qw( GetOptions :config gnu_getopt pass_through ); # Set pass_through so we don't kill @ARGV
 use URI 1.35;
-use Nebulous::Client 0.02;
 
 use base qw( Class::Accessor::Fast Exporter );
@@ -219 +218 @@
 {
     my $self = shift;           # Configuration object
+
+    eval {
+        require Nebulous::Client;
+    };
+    if ($@) {
+        carp "Can't find Nebulous::Client.";
+        exit($PS_EXIT_PROG_ERROR);
+    }
 
     return 1 if defined $self->{nebulous}; # Already started