bump version to 1.0-39
[pve-common.git] / data / PVE / AtomicFile.pm
1 package PVE::AtomicFile;
2
3 use strict;
4 use IO::AtomicFile;
5 use vars qw(@ISA);
6
7 @ISA = qw(IO::AtomicFile);
8
9 sub new {
10 my $class = shift;
11 my $self = $class->SUPER::new(@_);
12 $self;
13 }
14
15
16 sub DESTROY {
17 # dont close atomatically (explicit close required to commit changes)
18 }