From 2c1a0999f2d765190af4ff3e5249d3bcd635e07c Mon Sep 17 00:00:00 2001 From: Sebastian Schmelzer Date: Mon, 15 Dec 2008 16:32:49 +0000 Subject: git-svn-id: http://svn.openslx.org/svn/openslx/openslx/trunk@2408 95ad53e4-c205-0410-b2fa-d234c58c8868 --- lib/OpenSLX/DistroUtils/InitFile.pm | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) (limited to 'lib/OpenSLX/DistroUtils/InitFile.pm') diff --git a/lib/OpenSLX/DistroUtils/InitFile.pm b/lib/OpenSLX/DistroUtils/InitFile.pm index 570126e6..704d4eb2 100644 --- a/lib/OpenSLX/DistroUtils/InitFile.pm +++ b/lib/OpenSLX/DistroUtils/InitFile.pm @@ -67,6 +67,10 @@ sub _initialConfigHash() { 'blockDesc' => "restart: defines restart function for initscript", 'content' => {} }, + 'try-restart' => { + 'blockDesc' => "restart: defines restart function for initscript", + 'content' => {} + }, 'status' => { 'blockDesc' => "status: defines status function for initscript", 'content' => {} @@ -133,16 +137,19 @@ sub addScript { sub addDaemon { my $self = shift; my $binary = shift; + $binary =~ m/\/([^\/]*)$/; + my $shortname = $1; my $parameters = shift || ""; my $flags = shift || {}; my $required = $flags->{required} || 1; - my $desc = $flags->{desc} || "$binary"; + my $desc = $flags->{desc} || "$shortname"; my $errormsg = $flags->{errormsg} || "$desc failed!"; my $priority = $flags->{priority} || 5; push(@{$self->{'configHash'}->{'highlevelConfig'}}, { binary => $binary, + shortname => $shortname, parameters => $parameters, desc => $desc, errormsg => $errormsg, -- cgit v1.2.3-55-g7522