From 16f251a89cc4ce70eb870cfd97d9befaa19954bd Mon Sep 17 00:00:00 2001 From: axis Date: Fri, 19 Feb 2010 13:56:21 +0100 Subject: Changed createpackage script to use relative paths. This was done in order to support signsis on Linux, where relative paths are required. --- bin/createpackage.pl | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/bin/createpackage.pl b/bin/createpackage.pl index 10f4b40..0662ad0 100755 --- a/bin/createpackage.pl +++ b/bin/createpackage.pl @@ -277,7 +277,9 @@ if($stub) { print("\n"); # Sign SIS with certificate info given as an argument. - system ("signsis $unsigned_sis_name $signed_sis_name $certificate $key $passphrase"); + my $relcert = File::Spec->abs2rel($certificate); + my $relkey = File::Spec->abs2rel($key); + system ("signsis $unsigned_sis_name $signed_sis_name $relcert $relkey $passphrase"); # Check if creating signed SIS Succeeded stat($signed_sis_name); @@ -291,10 +293,10 @@ if($stub) { # Sign with additional certificates & keys for my $row ( @certificates ) { # Get certificate absolute file names, relative paths are relative to certfilepath - my $abscert = File::Spec->rel2abs( $row->[0], $certfilepath); - my $abskey = File::Spec->rel2abs( $row->[1], $certfilepath); + my $relcert = File::Spec->abs2rel(File::Spec->rel2abs( $row->[0], $certfilepath)); + my $relkey = File::Spec->abs2rel(File::Spec->rel2abs( $row->[1], $certfilepath)); - system ("signsis $signed_sis_name $signed_sis_name $abscert $abskey $row->[2]"); + system ("signsis $signed_sis_name $signed_sis_name $relcert $relkey $row->[2]"); print ("\tAdditionally signed the SIS with certificate: $row->[0]!\n"); } -- cgit v0.12