pkgsrc/lang/perl58/patches/patch-ce
tv 7c9976e9d7 Make perl58 work on Interix, with full shared-object module support.
Bump PKGREVISION (two .pm files were changed, but are not functionally
different on non-Interix OS's).
2004-04-24 21:04:43 +00:00

12 lines
331 B
Text

$NetBSD: patch-ce,v 1.1 2004/04/24 21:04:43 tv Exp $
--- lib/File/Temp.pm.orig Fri Apr 23 12:42:30 2004
+++ lib/File/Temp.pm Fri Apr 23 12:44:21 2004
@@ -2012,6 +2012,7 @@
{
my $TopSystemUID = 10;
+ $TopSystemUID = 197108 if $^O eq 'interix'; # "Administrator"
sub top_system_uid {
my $self = shift;
if (@_) {