fixed config file bug

This commit is contained in:
root 2019-03-06 19:48:12 +00:00
parent 89ce28e5d4
commit 53ed8e0e5b
1 changed files with 2 additions and 6 deletions

View File

@ -73,19 +73,15 @@ sub generateSys {
open(FH, '>>', $sysFile);
print FH $template;
};
sub generatePasswd {
}
sub generateConfig {
my $nodeName = shift;
my $confFile = "config";
open(FH, '>',$confFile);
my $nodeConfig = "nodename\t\t".$myNode;
my $nodeConfig = "nodename\t\t".$nodeName;
print FH $nodeConfig;
}