1 # Copyright 2000, International Business Machines Corporation and others.
4 # This software has been released under the terms of the IBM Public
5 # License. For details, see the LICENSE file in the top-level source
6 # directory or online at http://www.openafs.org/dl/license10.html
8 # An InstallGuide for the unix remote commands
12 # append the ta-rauth to the services file
13 $Services = "/etc/services";
15 &Patch::Verbose if ($InstallVerbose);
16 &Patch::FileOpen($Services);
18 $ServicesAppend = "ta-rauth 601/tcp rauth";
20 if (!&Patch::Patch($Services, [[0, "EOF", "", $ServicesAppend]])) {
21 &ErrorMsg("Did not succeed with patch", $Services);