From 531201ff802e9b65dab4ed4627133d5e8a612b34 Mon Sep 17 00:00:00 2001 From: joey Date: Mon, 3 Nov 2003 21:13:24 +0000 Subject: [PATCH] fix perms I hope --- Alien/Package/Deb.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Alien/Package/Deb.pm b/Alien/Package/Deb.pm index 78e8eaa..3658338 100644 --- a/Alien/Package/Deb.pm +++ b/Alien/Package/Deb.pm @@ -734,8 +734,8 @@ sub postinst { foreach my $file (sort keys %$owninfo) { my $quotedfile=$file; $quotedfile=~s/'/'"'"'/g; # no single quotes in single quotes.. - $permscript.="chown '$owninfo->{$file}' '$quotedfile'\n"; - $permscript.="chmod '$modeinfo->${file}' '$quotedfile'\n" + $permscript.="chown '".$owninfo->{$file}."' '$quotedfile'\n"; + $permscript.="chmod '".$modeinfo->${file}."' '$quotedfile'\n" if (defined $modeinfo->{$file}); } return "$firstline\n$permscript\n$rest";