******************************************************************************
******************************************************************************
*       MOD NAME: Move Topic Reason 6.7                                      *
******************************************************************************
*    DESCRIPTION: Allows A reason to be entered when moving     *
* a topic.  The explaination will be display by the moved
******************************************************************************
*              BY: Brett                                                     *
*            DATE: May 26, 2004.                                             *
*         VERSION: 1.0                                                       *
******************************************************************************
*   REQUIREMENTS: 6.7.1 & Mods Wordlets Installed                            *
*  COMPATABILITY: 6.7.1                                                      *
*      TESTED ON: 6.7.1                                                      *
******************************************************************************
*  FILES MODIFIED: public_move_topic.pl, ubb_topic_maint.cgi,                *
*  ubb_lib_posting.cgi, vars_wordlets_email.cgi                              *
*       NEW FILES: None                                                      *
******************************************************************************
******************************************************************************
*     DISCLAIMER: By using this mod, 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 GIVE US A VISIT AT:                           *
*                                                                            *
*                        http://www.ubbdev.com                               *
*                                                                            *
******************************************************************************
******************************************************************************

***************************
* In public_move_topic.pl *
***************************
* FIND:         *
*****************

print <<MoveTheTopic;

**************
* ADD ABOVE: *
**************

my $custom_tbt = &TBT_Custom("", "left");


*****************
* FIND:         *
*****************

<input type="checkbox" name="notify_starter" value="yes" $notify_checked />&nbsp;&nbsp; $vars_wordlets{move_notify_topic_starter}


**************
* ADD AFTER: *
**************

<script language="javascript" type="text/javascript">
<!--
function OpenBox() {
	//if(document.forms[0].elements[5].checked) {
	//	document.getElementById('give_explaination').checked = false;
	//	return alert("To enable explaination, the original topic cannot be set to be deleted.");
	//} // end if

	if(document.getElementById('give_explaination').checked) {
		document.getElementById('div-explaination').style.display = 'block';
		document.getElementById('txt-explaination').focus();
		document.getElementById('give_explaination').checked = true;
	}else{
		document.getElementById('give_explaination').checked = false;
		document.getElementById('div-explaination').style.display = 'none';
	} // end if
} // end
-->
</script>
<br /><br />

<div style="padding: 2px;">
<input type="checkbox" name="give_explaination" id="give_explaination" value="yes" onclick="OpenBox();" onchange="OpenBox();"
onblur="OpenBox();" onfocus="OpenBox();" />&nbsp;&nbsp; <label for="give_explaination">Give Move Explaination?</label>
</div>

<div style="display: none; position: absolute; z-index: +1;" id="div-explaination" onblur="document.getElementById('div-explaination').style.display='none';">
$custom_tbt
<tr bgcolor="$vars_style{TableColorStrip}">
<td>
<b><font size="$vars_style{TextSize}" face="$vars_style{FontFace}" color="$vars_style{TableStripTextColor}">
Topic Move Explaination
</font></b>
</td>
</tr>
<tr>
<td colspan="2" bgcolor="$vars_style{AltColumnColor1}">
<font size="$vars_style{TextSize}" face="$vars_style{FontFace}">
<textarea rows="5" cols="35" name="explaination" id="txt-explaination">$stat_line[13]</textarea><br /><br />
Extra PM Message(<i> Optional </i>):<br />
<textarea rows="2" cols="35" name="ext-explaination"></textarea>
</td>
</tr>
$TBB
</div>


***************************
* In ubb_topic_maint.cgi  *
***************************
* FIND:         *
*****************

	my @stat_line = split (/\|\|/, $topic_file[0], 12);

*****************
* REPLACE WITH: *
*****************

	local(@stat_line) = split (/\|\|/, $topic_file[0], 15);


*****************
* FIND:         *
*****************

			# adjust @topic_file
			$topic_file[0] = join ("||", @stat_line);
			$topic_file[0] .= "\n";


**************
* ADD ABOVE: *
**************

			# Move Topic Reason
			if($in{give_explaination} eq 'yes') {
				$stat_line[13] = &PipeCleaner($in{explaination});
				$stat_line[13] =~ s/\n/\<br \/\>/sig;
			} # end if


*****************
* FIND:         *
*****************

		&ubb_mail_tng({


**************
* ADD ABOVE: *
**************

			$html_message = &Template($html_message, {COMMENT => $stat_line[13], EXTRA => $in{'ext-explaination'} });		
			$email_message = &Template($email_message, {COMMENT => $stat_line[13], EXTRA => $in{'ext-explaination'} });


***************************
* In ubb_lib_posting.cgi  *
***************************
* FIND:         *
*****************

	@stat_line = split (/\|\|/, $topic_file[0], 12);

*****************
* REPLACE WITH: *
*****************

	@stat_line = split (/\|\|/, $topic_file[0], 13);

*****************
* FIND:         *
*****************

			$close_transfer_wording = qq(<b>$stat_line[7]</b>&nbsp;&nbsp;);

**************
* ADD AFTER: *
**************

			$close_transfer_wording .= "<br />$stat_line[13]" if $stat_line[13];



*******************************
* In vars_wordlets_email.cgi  *
*******************************
* FIND:         *
*****************

    q!move_topic_notify_text! => q!A topic you created at %%BBNAME%%, %%TOPIC_SUBJECT%%, has been moved to another forum.

The new forum is: %%THIS_FORUM_NAME%%

View Topic @ %%TOPIC_URL%%!,

*****************
* REPLACE WITH: *
*****************

    q!move_topic_notify_text! => q!A topic you created at %%BBNAME%%, %%TOPIC_SUBJECT%%, has been moved to another forum.

The new forum is: %%THIS_FORUM_NAME%%

View Topic @ %%TOPIC_URL%%.

The reason it was closed was: %%COMMENT%%.
%%EXTRA%%!,


*****************
* FIND:         *
*****************

    q!move_topic_notify_html! => q!<p>
A topic you created at %%BBNAME%%, %%TOPIC_SUBJECT%%, has been moved to another forum.
</p>
<p>
The new forum is: %%THIS_FORUM_NAME%%<br />
New location: <a href="%%TOPIC_URL%%">%%TOPIC_SUBJECT%%</a>
</p>
<br />!,


*****************
* REPLACE WITH: *
*****************

    q!move_topic_notify_html! => q!<p>
A topic you created at %%BBNAME%%, %%TOPIC_SUBJECT%%, has been moved to another forum.
</p>
<p>
The new forum is: %%THIS_FORUM_NAME%%<br />
New location: <a href="%%TOPIC_URL%%">%%TOPIC_SUBJECT%%</a>
</p>
<p>
The reason it was closed was because: %%COMMENT%%.
%%EXTRA%%
</p>
<br />!,