Changeset 17664

Timestamp:

May 13, 2008, 3:52:31 PM (18 years ago)

Author:

bills

Message:

Added $touch parameter to PS-IPP-Config

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.83 2008-05-13 20:26:53 jhoblitt Exp $
+# $Id: Config.pm,v 1.84 2008-05-14 01:52:31 bills Exp $
 
 package PS::IPP::Config;
@@ -364 +364 @@
     my $self = shift;           # Configuration object
     my $name = shift;           # File name to check
+    my $touch = shift;          # if $name is in nebulous instantiate it
 
     my $scheme = file_scheme($name); # The scheme, e.g., file://, path://
@@ -374 +375 @@
         $self->_neb_start();
         my $neb = $self->{nebulous}; # Nebulous handle
+        if ($touch) {
+            unless ($neb->stat( $name )) {
+                unless($neb->create( $name )) {
+                    carp "unable to instantiate $name.";
+                    exit($PS_EXIT_DATA_ERROR);
+                }
+            }
+        }
         return $neb->find( $name );
     }