From 7500c21b02b013d11e883c4b4de6e10c131ce87b Mon Sep 17 00:00:00 2001
From: "nethack.rankin" <nethack.rankin>
Date: Tue, 19 Jan 2010 02:58:59 +0000
Subject: [PATCH] unix+vms wizard mode feedback (trunk only)

     The message "only user <foo> may use wizard mode" formerly given
by the Unix and VMS ports was inadvertently rendered impossible to be
delivered when authorize_wizard_mode() was added to xxxmain.c nearly
3 years ago.
---
 sys/unix/unixmain.c | 1 +
 sys/vms/vmsmain.c   | 2 +-
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/sys/unix/unixmain.c b/sys/unix/unixmain.c
index 7e3342a44..9a6cbb418 100644
--- a/sys/unix/unixmain.c
+++ b/sys/unix/unixmain.c
@@ -575,6 +575,7 @@ authorize_wizard_mode()
 #endif
 	if (pw && !strcmp(pw->pw_name, WIZARD_NAME)) return TRUE;
 #endif	/* WIZARD */
+	wiz_error_flag = TRUE;	/* not being allowed into wizard mode */
 	return FALSE;
 }
 
diff --git a/sys/vms/vmsmain.c b/sys/vms/vmsmain.c
index 6cc7b2b3b..1b15175a1 100644
--- a/sys/vms/vmsmain.c
+++ b/sys/vms/vmsmain.c
@@ -1,5 +1,4 @@
 /* NetHack 3.5	vmsmain.c	$Date$  $Revision$ */
-/*	SCCS Id: @(#)vmsmain.c	3.5	2008/01/30	*/
 /* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
 /* NetHack may be freely redistributed.  See license for details. */
 /* main.c - VMS NetHack */
@@ -454,6 +453,7 @@ authorize_wizard_mode()
 #ifdef WIZARD
 	if (!strcmpi(nh_getenv("USER"), WIZARD_NAME)) return TRUE;
 #endif
+	wiz_error_flag = TRUE;	/* not being allowed into wizard mode */
 	return FALSE;
 }