<id>
Yesterday Mod 
</id>

<version>
1.01 SP1
</version>

<mod info>
Simlar to "Today" you get "Yesterday".

This mod changes the file Subs.pl. It is not usable if you use your Bulletin Board not only in English. 

Versionsgeschichte:

- Version 1.0 SP1: first version (by Pyrrhon)
- Version 1.01 SP1: bug fix in one of the time formats (by Pyrrhon)
</mod info>

<author>
Pyrrhon
</author>

<homepage>
http://www.philtalk.de/
</homepage>

<edit file>
Sources/Subs.pl
</edit file>

<search for>
	if ($mytimeselected == 1) {
		$newformat = qq~$newmonth/$newday/$newshortyear $txt{'107'} $newtime~;
		if ($mm == $newmonth && $dd == $newday && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~<b>$txt{'769'}</b> $txt{'107'} $newtime~; }
		return $newformat;

	} elsif ($mytimeselected == 2) {
		$newformat = qq~$newday.$newmonth.$newshortyear $txt{'107'} $newtime~;
		if ($mm == $newmonth && $dd == $newday && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~<b>$txt{'769'}</b> $txt{'107'} $newtime~; }
		return $newformat;

	} elsif ($mytimeselected == 3) {
		$newformat = qq~$newday.$newmonth.$newyear $txt{'107'} $newtime~;
		if ($mm == $newmonth && $dd == $newday && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~<b>$txt{'769'}</b> $txt{'107'} $newtime~; }
		return $newformat;

	} elsif ($mytimeselected == 4) {
		$newmonth--;
		$ampm = $newhour > 11 ? 'pm' : 'am';
		$newhour2 = $newhour % 12 || 12;
		$newmonth2 = $months[$newmonth];
		if( $newday > 10 && $newday < 20 ) { $newday2 = '<sup>th</sup>'; }
		elsif( $newday % 10 == 1 ) { $newday2 = '<sup>st</sup>'; }
		elsif( $newday % 10 == 2 ) { $newday2 = '<sup>nd</sup>'; }
		elsif( $newday % 10 == 3 ) { $newday2 = '<sup>rd</sup>'; }
		else{ $newday2 = '<sup>th</sup>'; }
		$newformat = qq~$newmonth2 $newday$newday2, $newyear, $newhour2:$newminute$ampm~;
		if ($mm == $newmonth + 1 && $dd == $newday && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~<b>$txt{'769'}</b> $txt{'107'} $newhour2:$newminute$ampm~; }
		return $newformat;

	} elsif ($mytimeselected == 5) {
		$ampm = $newhour > 11 ? 'pm' : 'am';
		$newhour2 = $newhour % 12 || 12;
		$newformat = qq~$newmonth/$newday/$newshortyear $txt{'107'} $newhour2:$newminute$ampm~;
		if ($mm == $newmonth && $dd == $newday && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~<b>$txt{'769'}</b> $txt{'107'} $newhour2:$newminute$ampm~; }
		return $newformat;

	} elsif ($mytimeselected == 6) {
		$newmonth2 = $months[$newmonth-1];
		$newformat = qq~$newday. $newmonth2 $newyear $txt{'107'} $newhour:$newminute~;
		if ($mm == $newmonth && $dd == $newday && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~<b>$txt{'769'}</b> $txt{'107'} $newhour:$newminute~; }
		return $newformat;
	}
</search for>

<replace>
# yesterday mod
$yester = "<b>Yesterday</b>";
	if ($mytimeselected == 1) {
		$newformat = qq~$newmonth/$newday/$newshortyear $txt{'107'} $newtime~;
		if ($mm == $newmonth && $dd == $newday && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~<b>$txt{'769'}</b> $txt{'107'} $newtime~; }
            if ($mm == $newmonth && $dd == ($newday + 1) && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester $txt{'107'} $newtime~; }
            if ($mm == ($newmonth + 1) && $dd == 1 && $newday == 31 && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester  $txt{'107'} $newtime~; }
            if ($mm == ($newmonth + 1) && $dd == 1 && $mm == 3 && $newday == 29 && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester  $txt{'107'} $newtime~; }
            if ($mm == ($newmonth + 1) && $dd == 1 && ($mm == 5 || $mm == 7 || $mm == 10 || $mm == 12) && $newday == 30 && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester  $txt{'107'} $newtime~; }
            if ($mm == 1 && $dd == 1 && $newday == 31 && $newmonth == 12 && $yy == ($newshortyear + 1) && $dontusetoday == 0) { $newformat = qq~$yester $txt{'107'} $newtime~; }
            if ($yy % 4 > 0 && $mm == 3 && $dd == 1 && $newmonth == 2 && $newday == 28 && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester  $txt{'107'} $newtime~; }
		return $newformat;
	} elsif ($mytimeselected == 2) {
		$newformat = qq~$newday.$newmonth.$newshortyear $txt{'107'} $newtime~;
		if ($mm == $newmonth && $dd == $newday && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~<b>$txt{'769'}</b> $txt{'107'} $newtime~; }
            if ($mm == $newmonth && $dd == ($newday + 1) && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester $txt{'107'} $newtime~; }
            if ($mm == ($newmonth + 1) && $dd == 1 && $newday == 31 && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester  $txt{'107'} $newtime~; }
            if ($mm == ($newmonth + 1) && $dd == 1 && $mm == 3 && $newday == 29 && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester  $txt{'107'} $newtime~; }
            if ($mm == ($newmonth + 1) && $dd == 1 && ($mm == 5 || $mm == 7 || $mm == 10 || $mm == 12) && $newday == 30 && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester  $txt{'107'} $newtime~; }
            if ($mm == 1 && $dd == 1 && $newday == 31 && $newmonth == 12 && $yy == ($newshortyear + 1) && $dontusetoday == 0) { $newformat = qq~$yester $txt{'107'} $newtime~; }
            if ($yy % 4 > 0 && $mm == 3 && $dd == 1 && $newmonth == 2 && $newday == 28 && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester  $txt{'107'} $newtime~; }
		return $newformat;
	} elsif ($mytimeselected == 3) {
		$newformat = qq~$newday.$newmonth.$newyear $txt{'107'} $newtime~;
		if ($mm == $newmonth && $dd == $newday && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~<b>$txt{'769'}</b> $txt{'107'} $newtime~; }
            if ($mm == $newmonth && $dd == ($newday + 1) && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester $txt{'107'} $newtime~; }
            if ($mm == ($newmonth + 1) && $dd == 1 && $newday == 31 && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester  $txt{'107'} $newtime~; }
            if ($mm == ($newmonth + 1) && $dd == 1 && $mm == 3 && $newday == 29 && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester  $txt{'107'} $newtime~; }
            if ($mm == ($newmonth + 1) && $dd == 1 && ($mm == 5 || $mm == 7 || $mm == 10 || $mm == 12) && $newday == 30 && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester  $txt{'107'} $newtime~; }
            if ($mm == 1 && $dd == 1 && $newday == 31 && $newmonth == 12 && $yy == ($newshortyear + 1) && $dontusetoday == 0) { $newformat = qq~$yester $txt{'107'} $newtime~; }
            if ($yy % 4 > 0 && $mm == 3 && $dd == 1 && $newmonth == 2 && $newday == 28 && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester  $txt{'107'} $newtime~; }
		return $newformat;
	} elsif ($mytimeselected == 4) {
		$ampm = $newhour > 11 ? 'pm' : 'am';
		$newhour2 = $newhour % 12 || 12;
		$newmonth2 = $months[$newmonth-1];
		if( $newday > 10 && $newday < 20 ) { $newday2 = '<sup>th</sup>'; }
		elsif( $newday % 10 == 1 ) { $newday2 = '<sup>st</sup>'; }
		elsif( $newday % 10 == 2 ) { $newday2 = '<sup>nd</sup>'; }
		elsif( $newday % 10 == 3 ) { $newday2 = '<sup>rd</sup>'; }
		else{ $newday2 = '<sup>th</sup>'; }
		$newformat = qq~$newmonth2 $newday$newday2, $newyear, $newhour2:$newminute$ampm~;
		if ($mm == $newmonth && $dd == $newday && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~<b>$txt{'769'}</b> $txt{'107'} $newhour2:$newminute$ampm~; }
            if ($mm == $newmonth && $dd == ($newday + 1) && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester $txt{'107'} $newhour2:$newminute$ampm~; }
            if ($mm == ($newmonth + 1) && $dd == 1 && $newday == 31 && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester  $txt{'107'} $newhour2:$newminute$ampm~; }
            if ($mm == ($newmonth + 1) && $dd == 1 && $mm == 3 && $newday == 29 && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester  $txt{'107'} $newhour2:$newminute$ampm~; }
            if ($mm == ($newmonth + 1) && $dd == 1 && ($mm == 5 || $mm == 7 || $mm == 10 || $mm == 12) && $newday == 30 && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester  $txt{'107'} $newhour2:$newminute$ampm~; }
            if ($mm == 1 && $dd == 1 && $newday == 31 && $newmonth == 12 && $yy == ($newshortyear + 1) && $dontusetoday == 0) { $newformat = qq~$yester $txt{'107'} $newhour2:$newminute$ampm~; }
            if ($yy % 4 > 0 && $mm == 3 && $dd == 1 && $newmonth == 2 && $newday == 28 && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester  $txt{'107'} $newhour2:$newminute$ampm~; }
		return $newformat;
	} elsif ($mytimeselected == 5) {
		$ampm = $newhour > 11 ? 'pm' : 'am';
		$newhour2 = $newhour % 12 || 12;
		$newformat = qq~$newmonth/$newday/$newshortyear $txt{'107'} $newhour2:$newminute$ampm~;
		if ($mm == $newmonth && $dd == $newday && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~<b>$txt{'769'}</b> $txt{'107'} $newhour2:$newminute$ampm~; }
            if ($mm == $newmonth && $dd == ($newday + 1) && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester $txt{'107'} $newhour2:$newminute$ampm~; }
            if ($mm == ($newmonth + 1) && $dd == 1 && $newday == 31 && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester  $txt{'107'} $newhour2:$newminute$ampm~; }
            if ($mm == ($newmonth + 1) && $dd == 1 && $mm == 3 && $newday == 29 && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester  $txt{'107'} $newhour2:$newminute$ampm~; }
            if ($mm == ($newmonth + 1) && $dd == 1 && ($mm == 5 || $mm == 7 || $mm == 10 || $mm == 12) && $newday == 30 && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester  $txt{'107'} $newhour2:$newminute$ampm~; }
            if ($mm == 1 && $dd == 1 && $newday == 31 && $newmonth == 12 && $yy == ($newshortyear + 1) && $dontusetoday == 0) { $newformat = qq~$yester $txt{'107'} $newhour2:$newminute$ampm~; }
            if ($yy % 4 > 0 && $mm == 3 && $dd == 1 && $newmonth == 2 && $newday == 28 && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester  $txt{'107'} $newhour2:$newminute$ampm~; }
		return $newformat;
	} elsif ($mytimeselected == 6) {
		$newmonth2 = $months[$newmonth-1];
		$newformat = qq~$newday. $newmonth2 $newyear $txt{'107'} $newhour:$newminute~;
		if ($mm == $newmonth && $dd == $newday && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~<b>$txt{'769'}</b> $txt{'107'} $newhour:$newminute~; }
            if ($mm == $newmonth && $dd == ($newday + 1) && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester $txt{'107'} $newhour:$newminute~; }
            if ($mm == ($newmonth + 1) && $dd == 1 && $newday == 31 && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester  $txt{'107'} $newhour:$newminute~; }
            if ($mm == ($newmonth + 1) && $dd == 1 && $mm == 3 && $newday == 29 && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester  $txt{'107'} $newhour:$newminute~; }
            if ($mm == ($newmonth + 1) && $dd == 1 && ($mm == 5 || $mm == 7 || $mm == 10 || $mm == 12) && $newday == 30 && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester  $txt{'107'} $newhour:$newminute~; }
            if ($mm == 1 && $dd == 1 && $newday == 31 && $newmonth == 12 && $yy == ($newshortyear + 1) && $dontusetoday == 0) { $newformat = qq~$yester $txt{'107'} $newhour:$newminute~; }
            if ($yy % 4 > 0 && $mm == 3 && $dd == 1 && $newmonth == 2 && $newday == 28 && $yy == $newshortyear && $dontusetoday == 0) { $newformat = qq~$yester  $txt{'107'} $newhour:$newminute~; }
		return $newformat;
	}
# end yesterday mod
</replace>