---

/* BEGIN DATE TIME FUNCTIONS */



function qtrans_strftime($format, $date, $default = '', $before = '', $after = '') {

	// don't do anything if format is not given

	if($format=='') return $default;

	// add date suffix ability (%q) to strftime

	$day = intval(ltrim(strftime("%d",$date),'0'))

	$search = array()

	$replace = array()

	

	// date S

	$search[] = '/(([^%])%q|^%q)/';

	if($day==1||$day==21||$day==31) { 

		$replace[] = '$2st';

	} elseif($day==2||$day==22) {

		$replace[] = '$2nd';

	} elseif($day==3||$day==23) {

		$replace[] = '$2rd';

	} else {

		$replace[] = '$2th';

	}

	

	$search[] = '/(([^%])%E|^%E)/'; $replace[] = '${2}'.$day; // date j

	$search[] = '/(([^%])%f|^%f)/'; $replace[] = '${2}'.date('w',$date) // date w

	$search[] = '/(([^%])%F|^%F)/'; $replace[] = '${2}'.date('z',$date) // date z

	$search[] = '/(([^%])%i|^%i)/'; $replace[] = '${2}'.date('i',$date) // date i

	$search[] = '/(([^%])%J|^%J)/'; $replace[] = '${2}'.date('t',$date) // date t

	$search[] = '/(([^%])%k|^%k)/'; $replace[] = '${2}'.date('L',$date) // date L

	$search[] = '/(([^%])%K|^%K)/'; $replace[] = '${2}'.date('B',$date) // date B

	$search[] = '/(([^%])%l|^%l)/'; $replace[] = '${2}'.date('g',$date) // date g

	$search[] = '/(([^%])%L|^%L)/'; $replace[] = '${2}'.date('G',$date) // date G

	$search[] = '/(([^%])%N|^%N)/'; $replace[] = '${2}'.date('u',$date) // date u

	$search[] = '/(([^%])%Q|^%Q)/'; $replace[] = '${2}'.date('e',$date) // date e

	$search[] = '/(([^%])%o|^%o)/'; $replace[] = '${2}'.date('I',$date) // date I

	$search[] = '/(([^%])%O|^%O)/'; $replace[] = '${2}'.date('O',$date) // date O

	$search[] = '/(([^%])%s|^%s)/'; $replace[] = '${2}'.date('P',$date) // date P

	$search[] = '/(([^%])%v|^%v)/'; $replace[] = '${2}'.date('T',$date) // date T

	$search[] = '/(([^%])%1|^%1)/'; $replace[] = '${2}'.date('Z',$date) // date Z

	$search[] = '/(([^%])%2|^%2)/'; $replace[] = '${2}'.date('c',$date) // date c

	$search[] = '/(([^%])%3|^%3)/'; $replace[] = '${2}'.date('r',$date) // date r

	$search[] = '/(([^%])%4|^%4)/'; $replace[] = '${2}'.$date; // date U

	$format = preg_replace($search,$replace,$format)



	$format = str_replace("%%", "%", $format) /* Xkeeper's lame hack */

	$format = str_replace("%q", "", $format) /* Your implementation of %q 

	                            (and pretty much everything else) is broken. */



	return $before.strftime($format, $date).$after;

}

---