Changeset 28900

Timestamp:

Aug 11, 2010, 12:24:06 PM (16 years ago)

Author:

bills

Message:

add a subroutine to check for destreak backup file corresponding to an output file
and delete it

File:

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

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

@@ -673 +673 @@
 }
 
+# delete existing destreak backup file if it exists
+sub delete_destreak_backup_file
+{
+    my $self = shift;
+    my $name = shift;
+    my $force = shift;
+
+    my $dir = dirname($name);
+    my $base = basename($name);
+    my $backup =  "$dir/SR_$base";
+
+    if ($self->file_exists($backup)) {
+        return $self->file_delete($backup, $force);
+    }
+    return 1;
+}
+
 # redirect stderr and stdout streams to a file
 sub redirect_output