Changeset 27092 for trunk/PS-IPP-Config/lib/PS/IPP/Config.pm

Timestamp:

Feb 25, 2010, 2:26:12 PM (16 years ago)

Author:

bills

Message:

Add force argument to $ipprc->file_delete() use it in magic_destreak_revert.pl

File:

• trunk/PS-IPP-Config/lib/PS/IPP/Config.pm (modified) (1 diff)

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

@@ -655 +655 @@
     my $self = shift;                # Configuration object
     my $name = shift;                # File name to check
+    my $force = shift;               # pass force flag to the delete method
     my $status;
 
     my $scheme = file_scheme($name); # The scheme, e.g., file://, path://
     if (defined $scheme and lc($scheme) eq 'neb') {
-        $status = eval { $self->nebulous->delete( $name ); };
+        $status = eval { $self->nebulous->delete( $name, $force ); };
         ( carp "Unable to delete Nebulous handle $name" and return undef ) if $@;
     } else {