#!/usr/local/bin/perl
# WebChat HipCat V1.0 Datafile
# Original WebChat code by Micheal Fremont
# Modifications by Brett Hagman and Del Simmons
#----------------------------------------------
$TRUE = 1;
$FALSE = 0;
# Base for www host (No trailing "/" in $www_base)
$www_base = "http://www.mojoski.com";
# Title for the chat page (goes in
tag, and default name)
$title_name = "The 'Ville!";
# Name of THIS file. Must be accessible by WWW.
$client = "$www_base/insiders/insiders.cgi";
# Name given to the anchor where NEW paragraphs appear
$dogear = "newstuff";
# Name of the talk file (local)
$talkfile = "/home/httpd/transcripts/theville.talk";
# Name of the error file (local)
$error_log_file = "/var/log/theville.error";
# Max length that a handle can take on
$max_handle_len = 50;
# Print host name after handle
$print_hostname = $TRUE;
# Allow pics to be posted in InputText (http://.../*.gif, *.jpg)
$display_inline_pics = $TRUE;
# Parse out bad language
$no_swear = $FALSE;
# Allow HTML in messages (none, some, full)
$allow_html = "none";
# Maintain chatter database
$maintain_chatters = $TRUE;
# Show the chatter base at the bottom of the chat page
$show_chatters = $TRUE;
# Name of the chatter database (local)
$chatter_file = "/home/httpd/chatters/theville.chatters";
# Time 'til a handle is destroyed from the chatter database
$destroy_time = 3; # minutes
# Output format for the chatter list on the chat page (see printf format)
$chatter_format = "%s: %02d:%02d
\n";
# HTML text to be output at the top of the chat page
$header_html ="htmlblocks/theville.header";
# HTML text to be output at the bottom of the chat page
$trailer_html = "htmlblocks/theville.trailer";
# HTML text to be output after the last paragraph and before the CHAT button
$quickinfo_html = "/mojodocs/bulletins/bulletin";
# Allow user to input own picture for handle
$use_manual_box = $TRUE;
# Allow user to select from given pictures
$use_select_box = $FALSE;
# Show the select box on GET method (ie display the select box)
$select_box_default = $FALSE;
# Default handle (on GET method)
$default_name = "Nameless member";
# Default pic for select box (on GET method)
$default_pic = "";
# Location of pictures for select box (local)
$picture_dir = "";
# URL base for local pictures
$pictureURL_base = "";
# Image used as background in chat page (Netscape)
$background_gif = "$www_base/chat/oldbkgd.gif";
# Should the background image be used?
$use_background_gif = $TRUE;
# Image used as a visual pointer to new messages
$point_gif = "$www_base/chat/moarrow2.gif";
# Image used in between messages
$para_break_gif = "$www_base/chat/modot2.gif ";
# Should the message break image be used?
$user_para_break_gif = $TRUE;
# Email address of chat page administrator
$disaster_mail = "del\@www.mojoski.com";
# Local time zone (to keep people clued in)
$local_tz = "EST (-0500 GMT)";
# Number of paras displayed around current para
$num_context_paras = 0; # around current para
# Number of paras displayed when you initially start the page (GET)
$num_context_paras_when_starting = 10; # initial read
# Number of paras displayed when the chatter is way behind
$way_back_when = 40; # if the user is way behind
# Maximum number of paras allowed in the BACK box
$max_read_back = 200; # max 200 paras back.
#############################################################################
# HERE WE GO!
require '/httpd/cgi-bin/chat.pl';
&do_web_chat;