version 1.18, 2000/12/21 14:38:31
|
version 1.20, 2000/12/21 19:26:01
|
Line 181 sub make_file_list {
|
Line 181 sub make_file_list {
|
my @allfiles=keys %{$info{'LOCATION'}{$distribution}}; |
my @allfiles=keys %{$info{'LOCATION'}{$distribution}}; |
foreach my $d (@$dirs) { |
foreach my $d (@$dirs) { |
# set other values |
# set other values |
$description.=<<END |
$description.=<<END; |
BinaryRoot/$d |
BinaryRoot/$d |
END |
END |
my $dirdescription=$info{'DIRECTORY'}{$distribution}{$d}{'DESCRIPTION'}; |
my $dirdescription=$info{'DIRECTORY'}{$distribution}{$d}{'DESCRIPTION'}; |
Line 251 END
|
Line 251 END
|
my $chmod=$info{'OWNERSHIP'}{$category}{'CHMOD'}; |
my $chmod=$info{'OWNERSHIP'}{$category}{'CHMOD'}; |
my $devchown=$info{'DEVOWNERSHIP'}{$category}{'CHOWN'}; |
my $devchown=$info{'DEVOWNERSHIP'}{$category}{'CHOWN'}; |
my $devchmod=$info{'DEVOWNERSHIP'}{$category}{'CHMOD'}; |
my $devchmod=$info{'DEVOWNERSHIP'}{$category}{'CHMOD'}; |
|
my ($owner,$group)=split(/\:/,$devchown); |
my $own=$devchown; $own=~s/\:/\,/; |
my $own=$devchown; $own=~s/\:/\,/; |
$description.=<<END; |
$description.=<<END; |
\tinstall -m $devchmod -d \$(TARGET)/$d |
\tinstall -o $owner -g $group -m $devchmod -d \$(TARGET)/$d |
END |
END |
} |
} |
$description.=<<END; |
$description.=<<END; |
Line 298 END
|
Line 299 END
|
my $source=$info{'LOCATION'}{$distribution}{$filesfull[$i]}{'SOURCE'}; |
my $source=$info{'LOCATION'}{$distribution}{$filesfull[$i]}{'SOURCE'}; |
my $rot=$filesfull[$i]; |
my $rot=$filesfull[$i]; |
$rot=~s/[^\/]+$/\./ if $rot=~/\*/; |
$rot=~s/[^\/]+$/\./ if $rot=~/\*/; |
|
my ($owner,$group)=split(/\:/,$devchown); |
$description.=<<END if $category ne 'symbolic link'; |
$description.=<<END if $category ne 'symbolic link'; |
\tinstall -m $devchmod \$(SOURCE)/$source \$(TARGET)/$rot |
\tinstall -o $owner -g $group -m $devchmod \$(SOURCE)/$source \$(TARGET)/$rot |
END |
END |
} |
} |
} |
} |