mlot/alien
1
0
Fork 0
mirror of https://github.com/Project-OSS-Revival/alien.git synced 2026-04-24 14:00:17 +00:00
Code Issues Packages Projects Releases Wiki Activity

* Fix a couple more mistakes in the code added in 8.36.

Browse Source
This commit is contained in:
joey
2003-11-12 02:57:17 +00:00
parent bbb5ed69d1
commit 09057d6d33
3 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Alien/Package/Deb.pm
View File

@@ -722,7 +722,7 @@ sub postinst {
return $postinst unless ref $owninfo;
# If there is no postinst, let's make one up..
$postinst="#!/bin/sh\n" unless defined $postinst;
$postinst="#!/bin/sh\n" unless length $postinst;
my ($firstline, $rest)=split(/\n/, $postinst, 2);
if ($firstline !~ m/^#!\s*\/bin\/sh/) {

2
Alien/Package/Rpm.pm
View File

@@ -217,7 +217,7 @@ sub unpack {
$gid=0;
}
if (defined($owninfo{$file}) && ($mode & 07000 > 0)) {
$modeinfo{$file} = $mode;
$modeinfo{$file} = sprintf "%lo", $mode;
}
next unless -e "$workdir/$file"; # skip broken links
if ($> == 0) {