summaryrefslogtreecommitdiff
path: root/solenv/bin/modules/installer/systemactions.pm
diff options
context:
space:
mode:
authorTim Retout <tim@retout.co.uk>2012-09-27 19:22:32 +0100
committerTim Retout <tim@retout.co.uk>2012-09-27 19:24:53 +0100
commit0ab561bffadad1eab9eb98c05106f4c0132ccb36 (patch)
treef4c64a3abadc2b792f11cd96fc3b292f6b496d91 /solenv/bin/modules/installer/systemactions.pm
parentb45263ad292801fd4b32a2f5183508cf4ad7f885 (diff)
installer: Move two copies of make_systemcall into systemactions.pm
Change-Id: I526fae59d28e75d27259867e3fc7e7c99be0d437
Diffstat (limited to 'solenv/bin/modules/installer/systemactions.pm')
-rw-r--r--solenv/bin/modules/installer/systemactions.pm25
1 files changed, 25 insertions, 0 deletions
diff --git a/solenv/bin/modules/installer/systemactions.pm b/solenv/bin/modules/installer/systemactions.pm
index 702b6fedacb0..22d83fb6058b 100644
--- a/solenv/bin/modules/installer/systemactions.pm
+++ b/solenv/bin/modules/installer/systemactions.pm
@@ -1358,4 +1358,29 @@ sub remove_empty_dirs_in_folder
}
+######################################################
+# Making systemcall
+######################################################
+
+sub make_systemcall
+{
+ my ($systemcall) = @_;
+
+ my $returnvalue = system($systemcall);
+
+ my $infoline = "Systemcall: $systemcall\n";
+ push( @installer::globals::logfileinfo, $infoline);
+
+ if ($returnvalue)
+ {
+ $infoline = "ERROR: Could not execute \"$systemcall\"!\n";
+ push( @installer::globals::logfileinfo, $infoline);
+ }
+ else
+ {
+ $infoline = "Success: Executed \"$systemcall\" successfully!\n";
+ push( @installer::globals::logfileinfo, $infoline);
+ }
+}
+
1;