+Thu Aug 10 09:54:52 2000 Ezra Peisach <epeisach@mit.edu>
+
+ * rlogin.exp: Change RLOGIN to KRLOGIN so we do not use the
+ incorrect binary as used for the root login in default.exp.
+
Thu Nov 14 15:20:19 1996 Barry Jaspan <bjaspan@mit.edu>
* telnet.exp: telnet may output fqdn in upper-case
# if they exist. If they do not, then they must be in PATH. We
# expect $objdir to be .../kerberos/src.
-if ![info exists RLOGIN] {
- set RLOGIN [findfile $objdir/../../appl/bsd/rlogin]
+if ![info exists KRLOGIN] {
+ set KRLOGIN [findfile $objdir/../../appl/bsd/rlogin]
}
if ![info exists KRLOGIND] {
proc rlogin_test { } {
global REALMNAME
- global RLOGIN
+ global KRLOGIN
global BINSH
global SHELL_PROMPT
global KEY
start_rlogin_daemon -k
# Make an rlogin connection.
- spawn $RLOGIN $hostname -k $REALMNAME -D 3543
+ spawn $KRLOGIN $hostname -k $REALMNAME -D 3543
expect_after {
timeout {
# Try an encrypted connection.
start_rlogin_daemon -e
- spawn $RLOGIN $hostname -x -k $REALMNAME -D 3543
+ spawn $KRLOGIN $hostname -x -k $REALMNAME -D 3543
expect_after {
timeout {