/[cvs]/nfo/perl/scripts/umltools/uml_setup.pl
ViewVC logotype

Diff of /nfo/perl/scripts/umltools/uml_setup.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.3 by joko, Sun Nov 3 01:22:23 2002 UTC revision 1.4 by joko, Mon Sep 20 22:08:17 2004 UTC
# Line 205  if (\$action eq \"stop\") { Line 205  if (\$action eq \"stop\") {
205    
206    # runlevel init scripts    # runlevel init scripts
207    $filename = "$runlevel_base/S30$daemon";    $filename = "$runlevel_base/S30$daemon";
208    $cmd = "rm $filename; ln $initscript_path -s $filename";    $cmd = "test -e $filename && rm $filename; ln $initscript_path -s $filename";
209    askCmd("do it?", $cmd, "create $filename");    askCmd("do it?", $cmd, "create $filename");
210    chmod S_IRWXU|S_IRGRP|S_IXGRP|S_IROTH|S_IXOTH, $filename;    chmod S_IRWXU|S_IRGRP|S_IXGRP|S_IROTH|S_IXOTH, $filename;
211    
212    $filename = "$runlevel_base/K01$daemon";    $filename = "$runlevel_base/K01$daemon";
213    $cmd = "rm $filename; ln $initscript_path -s $filename";    $cmd = "test -e $filename && rm $filename; ln $initscript_path -s $filename";
214    askCmd("do it?", $cmd, "create $filename");    askCmd("do it?", $cmd, "create $filename");
215    chmod S_IRWXU|S_IRGRP|S_IXGRP|S_IROTH|S_IXOTH, $filename;    chmod S_IRWXU|S_IRGRP|S_IXGRP|S_IROTH|S_IXOTH, $filename;
216    
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4
MailToCvsAdmin">MailToCvsAdmin
 ViewVC Help
Powered by ViewVC 1.1.26 RSS 2.0 feed