summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: a438fe5)
raw | patch | inline | side by side (parent: a438fe5)
author | rettenbe <rettenbe@594d385d-05f5-0310-b6e9-bd551577e9d8> | |
Tue, 24 Mar 2009 10:44:31 +0000 (10:44 +0000) | ||
committer | rettenbe <rettenbe@594d385d-05f5-0310-b6e9-bd551577e9d8> | |
Tue, 24 Mar 2009 10:44:31 +0000 (10:44 +0000) |
git-svn-id: https://oss.gonicus.de/repositories/gosa/trunk@13560 594d385d-05f5-0310-b6e9-bd551577e9d8
gosa-si/tests/deploy-gosa-si.pl | patch | blob | history |
index 3a19cf441d4e2ea3515733c917707a20c130bc0a..f824b5db813a981ede31693891315f8b798c4a42 100755 (executable)
use strict;
use warnings;
+use File::Spec;
+use Data::Dumper;
-my $gosa_path = "/home/rettenbe/gonicus/Projekte/gosa/trunk/gosa-si/";
+my $test_path = File::Spec->rel2abs(File::Spec->curdir());
+my @gosa_dir = File::Spec->splitdir($test_path);
+pop(@gosa_dir);
+my $gosa_path = File::Spec->catdir(@gosa_dir);
my %copies = (
"/usr/sbin/gosa-si-server" => "gosa-si-server",
print STDERR "$del_cmd\n";
system($del_cmd);
+
my $ln_cmd = "ln -s ".$gosa_path.$file_name." $new_file";
print STDERR "$ln_cmd\n";
system($ln_cmd);