*****************************************************************************************
*****************************************************************************************
*      Mod NAME:  Latest Reply By in Forumdisplay 		    	         	*
*****************************************************************************************
*    DESCRIPTION: This mod places a link in forumdisplay.cgi to the last post in a 	*
*		  thread with the author's name.					*
*****************************************************************************************
*     CREATED BY: Slurpee   	(webmaster@vhlinks.com)                        		*
*           DATE: 01/20/2000                                   		       		*
*        VERSION: 1		                                             		*
*	 Credits: [aa], repstein, and Dark Templar	(bug fixes)	 		*
*		  									*
*****************************************************************************************
*   REQUIREMENTS: full version                                             		*
*  COMPATABILITY: Should work in all versions 5.39 to present, tho you might have	*
*		  slight code differences.                                     		*
*****************************************************************************************
* FILES MODIFIED: ubb_library.pl, ubb_library2.pl, forumdisplay.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 VISIT US AT:                             		*
*                                                                            		*
*              		    http://www.ubbdev.com		  		        *
*                                                                            		*
*****************************************************************************************
*****************************************************************************************





#############################
forumdisplay.cgi
#############################


## FIND:

$ThisURL = qq($CGIURL/forumdisplay.cgi?action=displayprivate&number=$number&topic=$threadinfo[1]);
} else {
$ThisURL = qq($NonCGIURL/$ExactPath/HTML/$threadinfo[1].html);
}

## PASTE THIS UNDER:

##Slurpee's Last Username Hack for Thread Link
$replies = $threadinfo[3];
$totalposts = $replies+ 1;
$lastpage = "";
$thesepages = $totalposts / $HTMLDisplayMax;
if ($remainder >= 0) { $thesepages++; }
if ($thesepages > 0) {
$lastpage = "$ThisURL";
for (my $i=2; $i< $thesepages; $i++){

if ($PrivateMax eq "yes") {
$lastpage = "$CGIURL/forumdisplay.cgi?action=displayprivate&number=$number&topic=$threadinfo[1]-$i";
} else {
$lastpage = "$NonCGIURL/$ExactPath/HTML/$threadinfo[1]-$i.html";
}
}
}

$lastName = $threadinfo[8];
$lastName =~ tr/+/ /;

if ($replies >= 1) {
$lastAuthName = qq(<br>Latest reply by: <a href="$lastpage#$threadinfo[3]">$lastName</a> );
} else {
$lastAuthName = "";
}

##End of Last Username Hack


## FIND:

<FONT SIZE="$DateSize" FACE="$FontFace">$TheDate <FONT SIZE="$DateSize" FACE="$FontFace" COLOR="$TimeColor">$FormatTime</font></font>

## PASTE THIS UNDER:

<FONT SIZE="$DateSize" FACE="FontFace">$lastAuthName</FONT>



#############################
ubb_library.pl
#############################


## FIND:

($MonthOfMessage, $DayOfMessage, $YearOfMessage) = split(/\-/, $lastreply[3]);

## PASTE THIS UNDER:

$lastAuthor = $lastreply[2];
$lastAuthor =~ tr/ /+/;
chomp($lastAuthor);


## FIND:

$itemline = "$PostJulianTime|^|$ThreadNumber|^|$Subject|^|$TotalReplies|^|$author|^|$DateTime|^|$closed|^|$MsgIcon";


## REPLACE WITH:

$itemline = "$PostJulianTime|^|$ThreadNumber|^|$Subject|^|$TotalReplies|^|$author|^|$DateTime|^|$closed|^|$MsgIcon|^|$lastAuthor";


## FIND:

sub AppendForumSummary {
$number = shift;
$ThreadFile = shift;

## PASTE THIS UNDER:

$lastAuthor = shift;    #passed from DoPostTheTopic
chomp($lastAuthor);


## FIND:

$newline = "$PostJulianTime|^|$threadnum|^|$TopicSubject|^|0|^|$UserName|^|$DateTime|^|no|^|$MsgIcon";

## REPLACE WITH:

$newline = "$PostJulianTime|^|$threadnum|^|$TopicSubject|^|0|^|$UserName|^|$DateTime|^|no|^|$MsgIcon|^|$lastAuthor";


## FIND:

my $ThisIcon = $statarray[6];
chomp($ThisIcon);

## PASTE THIS UNDER:

$lastAuthor = $lastreply[2];
$lastAuthor =~ tr/ /+/;
chomp($lastAuthor);


## FIND:

$newline = "$PostJulianTime|^|$threadnum|^|$subject|^|$TotalReplies|^|$author|^|$DateTime|^|$Closed|^|$ThisIcon";

## REPLACE WITH:

$newline = "$PostJulianTime|^|$threadnum|^|$subject|^|$TotalReplies|^|$author|^|$DateTime|^|$Closed|^|$ThisIcon|^|$lastAuthor";


## FIND:

chomp($checkit[7]);

## PASTE THIS UNDER:

chomp($checkit[8]);


#############################
ubb_library2.pl
#############################


## FIND:

$ThisThread .= qq(<tr $AlternateColor>
	<TD width=18% valign=top>
	<FONT SIZE="$TextSize" face="$FontFace">

## ADD THIS IMMEDIATELY AFTER AND BEFORE <B>$thisline[2]</B>:

<a name="$ThisReplyNumber">

## NOTE: If you have Mas*Mind's Anchor Mod installed, you should instead look for:
## THE BELOW IS *ONLY* IF YOU HAVE Mas*Mind's ANCHOR MOD INSTALLED


<FONT SIZE="$TextSize" face="$FontFace"><B><A name=$hrefname>$thisline[2]</a></B>

## REPLACE THAT WITH:

<FONT SIZE="$TextSize" face="$FontFace"><a name="$ThisReplyNumber"><B>$thisline[2]</a></B>




## Upload files in ASCII, and set their permissions to 755.
## Go to general settings in the control panel and click the checkbox for
## rebuilding forum files; submit changes, and then update threads.

## DONE