summaryrefslogtreecommitdiff
path: root/beagle/debian-rfs/usr/share/perl5/Debconf/TmpFile.pm
diff options
context:
space:
mode:
Diffstat (limited to 'beagle/debian-rfs/usr/share/perl5/Debconf/TmpFile.pm')
-rw-r--r--beagle/debian-rfs/usr/share/perl5/Debconf/TmpFile.pm32
1 files changed, 0 insertions, 32 deletions
diff --git a/beagle/debian-rfs/usr/share/perl5/Debconf/TmpFile.pm b/beagle/debian-rfs/usr/share/perl5/Debconf/TmpFile.pm
deleted file mode 100644
index 2e7cead..0000000
--- a/beagle/debian-rfs/usr/share/perl5/Debconf/TmpFile.pm
+++ /dev/null
@@ -1,32 +0,0 @@
-#!/usr/bin/perl
-# This file was preprocessed, do not edit!
-
-
-package Debconf::TmpFile;
-use strict;
-use IO::File;
-use Fcntl;
-
-
-my $filename;
-
-sub open {
- my $fh; # will be autovivified
- my $ext=shift || '';
- do { $filename=POSIX::tmpnam().$ext }
- until sysopen($fh, $filename, O_WRONLY|O_TRUNC|O_CREAT|O_EXCL, 0600);
- return $fh;
-}
-
-
-sub filename {
- return $filename;
-}
-
-
-sub cleanup {
- unlink $filename;
-}
-
-
-1