*****************************************************************************************
*****************************************************************************************
*      Mod NAME:  Get Rid of Annoying ALL CAPS Subjects and Messages           		*
*****************************************************************************************
*    DESCRIPTION: This mod converts messages that someone types in ALL CAPS into 	*
*		  correct case.	  							*
*****************************************************************************************
*     CREATED BY: Leshrac	       			                       		*
*           DATE: 09-12-1999                                  		       		*
*        VERSION: 1.0		                                             		*
*****************************************************************************************
*REDOCUMENTED BY: AllenAyres       AllenAyres@ubbdev.com                     		*
*           DATE: 09/07/2000	                                        		*
*        VERSION: All			                                     		*
*****************************************************************************************
*   REQUIREMENTS: none		                                             		*
*  COMPATABILITY: all recent	                                         		*
*****************************************************************************************
*    FILES ADDED: none		                                          		*
* FILES MODIFIED: postings.cgi	                                         		*
*****************************************************************************************
*     DISCLAIMER: By using this hack, the user implicitly agrees that they   		*
*                 are willingly modifying any and all files at their own     		*
*                 risk.  Should any errors occur either as a direct or       		*
*                 indirect result of said modifications the user agrees not  		*
*                 to hold Infopop Corporation or any of the individuals      		*
*                 listed above accountable.                                  		*
*                                                                            		*
*                                                                            		*
*    IN OTHER WORDS: PLEASE MAKE BACKUP COPIES OF EVERY FILE YOU PLAN TO     		*
*                      MODIFY PRIOR TO MODIFICATION!!                        		*
*                                                                            		*
*                                                                            		*
*     FOR MORE TIPS AND TRICKS FOR USE WITH THE ULTIMATE BULLETIN BOARD      		*
*                            PLEASE US AT VISIT:                             		*
*                                                                            		*
*              		    http://www.ubbdev.com		  		        *
*                                                                            		*
*****************************************************************************************
*****************************************************************************************




#############################
postings.cgi
#############################



## FIND:

$ReplyMessage = $in{'ReplyMessage'};
$Message = $in{'Message'};


## PASTE THIS UNDER:

# ALL CAPS Message Hack
if ($ReplyMessage eq uc $ReplyMessage) {
	$ReplyMessage = ucfirst lc $ReplyMessage;
}
if ($Message eq uc $Message) {
	$Message = ucfirst lc $Message;
}


## FIND:

$TopicSubject = &CensorCheck("$TopicSubject");


## PASTE THIS UNDER:

# Topic Subject All Caps Mod
if ($TopicSubject eq uc $TopicSubject) {
  $TopicSubject = ucfirst lc $TopicSubject;
  $TopicSubject =~ s/(\s)(\w)(\w{2,})/$1\u$2$3/g;
  $TopicSubject =~ s/(\s)i(\W)/$1I$2/g;
  $TopicSubject =~ s/\.(\s+?)(\w)/\.$1\u$2/g;
}
# end



DONE!