#
# unix
#
# An InstallGuide for the unix remote commands
#

sub unix {
  # append the ta-rauth to the services file
  $Services = "/etc/services";
  &ErrorsAreFatal(1);
  &Patch::Verbose if ($InstallVerbose);
  &Patch::FileOpen($Services);

  $ServicesAppend = "ta-rauth	601/tcp rauth";

  if (!&Patch::Patch($Services, [[0, "EOF", "", $ServicesAppend]])) {
    &ErrorMsg("Did not succeed with patch", $Services);
  }
}
