#
# Patch name: wiz_page
# PAtch version: 1
# Author's name: Jason Wilcox
# Author's email: jwilcox@telmaron.com
# version of PennMUSH: 1.6.10p4
# Date patch made: 4/19/97
# Author is willing to support (yes/no): Yes
# Patch Format: diff -c
#
#
# This is a contributed PennMUSH patch. Its subject to the same 
# restrictions found in PennMUSH's hdrs/copyrite.h file.
#
# No warranty is given for this patch. It is not necassarily going to 
# work on your system, with any version of PennMUSH other than the one 
# above etc.
#
# If the author given above was willing to support the patch, you should 
# write to the author if you have any questions or problems. Do *NOT*
# send email messages to Javelin or any PennMUSH mailing list. about
# this patch!
#
# Below this line is the author's description of the patch followed
# by the patch itself. If the patch is in context diff format, you'll 
# probably apply it by typing: patch < patchfile in your top-level
# MUSH directory, unless instructed otherwise below.
#

This patch is so that Wizards can override pagelocks and the HAVEN flag.
I've always been annoyed when trying to page a player and they are HAVEN,
or even worse I'm confroting them about something and they decide they 
don't want to talk and pagelock me. Now, yes, you can just unlock their 
pagelockor set them !HAVEN, but why? They probably have a good reason to
be HAVEN, and their pagelock may include more than you, so to make it less
work on you, and less worry about causing problems for your players, 
you can just override their pagelock or HAVEN.

[ Note: The traditional solution to this is whisper *player=message,
  as whispers can't be blocked and admin can whisper long-distance.
  - Javelin ]


*** src/speech2.c	Sat Apr 19 16:19:30 1997
--- src/speech.c	Sat Apr 19 16:10:36 1997
***************
*** 738,748 ****
        page_return(player, target, "Away", "AWAY",
  		  "That player is not connected.");
        continue;
!     } else if (Haven(target)) {
        page_return(player, target, "Haven", "HAVEN",
  		  "That player is not accepting any pages.");
        continue;
!     } else if (!eval_lock(player, target, Page_Lock)) {
        if (Dark(target))
  	page_return(player, target, "Away", "AWAY",
  		    "That player is not connected.");
--- 738,753 ----
        page_return(player, target, "Away", "AWAY",
  		  "That player is not connected.");
        continue;
!     } /* Hacked in the !Wizard(player) so that WIZ can get around the 
!        * HAVEN flag JW.
!        */
!       else if (Haven(target) && !Wizard(player)) {
        page_return(player, target, "Haven", "HAVEN",
  		  "That player is not accepting any pages.");
        continue;
!     } /* Hacked in !Wizard(player) so that WIZ can get around pagelocks. JW
!        */
!       else if (!Wizard(player) && !eval_lock(player, target, Page_Lock)) {
        if (Dark(target))
  	page_return(player, target, "Away", "AWAY",
  		    "That player is not connected.");