check env for $authserver

2005-11-07 15:13:16 +00:00 · 2005-11-07 15:13:16 +00:00 · 7732ac0a9b
parent 43b112897a
commit 7732ac0a9b
1 changed files with 7 additions and 0 deletions
--- a/cpu.c
+++ b/cpu.c
@ -182,6 +182,13 @@ cpumain(int argc, char **argv)
 		system = p;
 	}
 	
+	if(authserver == nil) {
+		p = getenv("auth");
+		if(p == 0)
+			fatal(0, "set $auth");
+		authserver = p;
+	}
+
 	if(err = rexcall(&data, system, srvname))
 		fatal(1, "%s: %s", err, system);