Michael Heilemann.
If you have Dunstan's Time Since installed, this plugin uses it for the title="" attributes on the comments and posts. (For WordPress 1.5) Author: Brian Meidell Author URI: http://meidell.dk/ Version 1.5: Now works without LOCK TABLE and CREATE TEMPORARY TABLE priviledges. Version 1.5.1: Can't remember what I did here Version 1.5.2: Fixed count select statement to not include spammy comments Version 1.5.3: Properly excludes track- and pingbacks Version 1.5.4: Excludes posts that are not published, even if they have comments Version 1.5.5: Fade old comments, fixed bug that wreaked havoc with Time Since Version 1.5.6: Bugfix from Jonas Rabbe (http://www.jonas.rabbe.com/) pertaining to timesince Version 1.5.7: Bugfix so old colors can be darker than new colors (stupid oversight), thanks to http://spiri.dk for spotting it. Bugfix where single digit hex would cause invalid colors, thanks to http://www.wereldkeuken.be/ for the fix. Version 1.5.8: Updated to work with WordPress 2.1 alpha by M. Heilemann. */ function blc_latest_comments($num_posts = 5, $num_comments = 6, $hide_pingbacks_and_trackbacks = true, $prefix = "
  • ", $postfix = "
  • ", $fade_old = true, $range_in_days = 10, $new_col = "#444444", $old_col = "#cccccc") { global $wpdb; function clamp($min, $max, $val) { return max($min,min($max,$val)); } $usetimesince = function_exists('time_since'); // Work nicely with Dunstan's Time Since plugin (adapted by Michael Heilemann) // This is compensating for the lack of subqueries in mysql 3.x // The approach used in previous versions needed the user to // have database lock and create tmp table priviledges. // This uses more queries and manual DISTINCT code, but it works with just select privs. if(!$hide_pingbacks_and_trackbacks) $ping = ""; else $ping = "AND comment_type<>'pingback' AND comment_type<>'trackback'"; $posts = $wpdb->get_results("SELECT comment_post_ID, post_title FROM ($wpdb->comments LEFT JOIN $wpdb->posts ON (comment_post_ID = ID)) WHERE comment_approved = '1' AND $wpdb->posts.post_status='publish' $ping ORDER BY comment_date DESC;"); $seen = array(); $num = 0; if($fade_old) { $max_time = $range_in_days * 24 * 60 * 60 ; $r_new = hexdec(substr($new_col, 1, 2)); $r_old = hexdec(substr($old_col, 1, 2)); //$r_min = min($min, $max); //$r_max = max($min, $max); $r_range = ($r_old-$r_new); $g_new = hexdec(substr($new_col, 3, 2)); $g_old = hexdec(substr($old_col, 3, 2)); //$g_min = min($min, $max); //$g_max = max($min, $max); $g_range = ($g_old-$g_new); $b_new = hexdec(substr($new_col, 5, 2)); $b_old = hexdec(substr($old_col, 5, 2)); //$b_min = min($min, $max); //$b_max = max($min, $max); $b_range = ($b_old-$b_new); } // print "ranges: $r_range, $g_range, $b_range
    "; // print "r: ".(0.5*$r_range+$r_new)."
    "; foreach($posts as $post) { // The following 5 lines is a manual DISTINCT and LIMIT, // since mysql 3.x doesn't allow you to control which way a DISTINCT // select merges multiple entries. if(array_key_exists($post->comment_post_ID, $seen)) continue; $seen[$post->comment_post_ID] = true; if($num++ > $num_posts) break; $commenters = $wpdb->get_results("SELECT *, UNIX_TIMESTAMP(comment_date) AS unixdate FROM $wpdb->comments WHERE comment_approved = '1' AND comment_post_ID = '".$post->comment_post_ID."' $ping ORDER BY comment_date DESC LIMIT $num_comments;"); $count = $wpdb->get_var("SELECT COUNT(comment_ID) AS c FROM $wpdb->comments WHERE comment_post_ID = $post->comment_post_ID AND comment_approved = '1' ".$ping); $i = 0; $link = get_permalink($post->comment_post_ID); if($usetimesince) $title = " title=\"Last comment was ".time_since($comment->unixdate)." ago\""; else $title = ""; echo $prefix."".stripslashes($post->post_title). "  ".$count."
    \n"; foreach($commenters as $commenter) { if($usetimesince) $title = " title=\"Posted ".time_since($commenter->unixdate)." ago\""; if($fade_old) { $diff = time() - $commenter->unixdate; $r = round($diff/$max_time*($r_range))+$r_new; $r = clamp(min($r_new, $r_old), max($r_new, $r_old), $r); $g = round($diff/$max_time*($g_range))+$g_new; $g = clamp(min($g_new, $g_old), max($g_new, $g_old), $g); $b = round($diff/$max_time*($b_range))+$b_new; $b = clamp(min($b_new, $b_old), max($b_new, $b_old), $b); $r_hex = str_pad(dechex($r), 2, '0', STR_PAD_LEFT); $g_hex = str_pad(dechex($g), 2, '0', STR_PAD_LEFT); $b_hex = str_pad(dechex($r), 2, '0', STR_PAD_LEFT); $colstr = " style=\"color: #".$r_hex.$g_hex.$b_hex.";\""; } if($i++ > 0) echo ", "; echo "comment_ID."\"$title>".stripslashes($commenter->comment_author).""; } if($count > $num_comments) echo " [...]"; echo "".$postfix."\n"; } } ?> @YEMblog Twitter Updates for 2011-03-26 | YEMblog
    • Internet Bitching Circa 1994: "Phish should retire BBJ" RT: @phanart http://bit.ly/gKgsfu hope SB9 winds up bringing back Big Ball Jam #
    • @cmanc You mean like this one from the minute it happened? http://bit.ly/gQc4XY #
    • That means a lot, Jiggs, thank you! RT @jiggslikesphish: #FF @heyscottyb Alot of work goes into @YEMblog. We appreciate it! #Phish #
    • That's not official @OnlinePhishTour As awesome as it may be, the clip was put together by @SteveTConroy for fun. #unofficial #fanmade #
    • Our pal @SteveTConroy gives a look at what a #superball9 announcement vid may look like http://youtu.be/5P93d6Nfh94 #unofficial #fanmade #
    • RT @typeIIcast: Presenting "Forgotten Friday" 6 tracks we wish we could have included on this week's episode. http://wp.me/pZaCp-45 #phish #
    • FYI, apparently that website I linked to is for Sector 9 skateboards and NOT STS9. Still uses the purported SB9 logo for merch #
    • @friendlybook You're right, apparently it's a skateboard company. Still doesn't seem connected to #phish #
    • @friendlybook It's the band's merch website. There's also a pic of a hat with that logo on sector9.com #
    • @rowj I'm not questioning superball9.com, I'm questioning the twitter feed that was probably set up by a fan #
    • I don't doubt superjam9.com's veracity, I'm just questioning the twitter feed @rowj #
    • Actually @BandsThatJam looks like STS9 uses that exact same logo http://bit.ly/fUzp0V Maybe @superball9 is not band-run #unverified #
    • Nice find! RT @BandsThatJam: #SuperBall9 @SuperBall9 http://twitter.com/superball9 #Phish #WatkinsGlen #
    • Love it! RT @joshkorin: @YEMblog set of all the Bond movie songs of course w/ heavy Bond theme teases in each… #yembconvo #
    • Long: 10/31/96 Short: 10/31/94 RT @LSaxilla: Favorite Simple ever? I cannot get enough of this tune lately. #we #039;vegotaband #
    • I could see it now… RT @bungle094: @YEMblog early morning death metal cover set. #yembconvo #
    • YEM > Boys of Summer > YEM, View to a Kill, Hood, Shout, HYHU > Party All The Time > HYHU, Raspberry Beret, Money For Nothing, Antelope #sb9 #
    • How about a jukebox set commemorating a certain year? Pick 1984 or later and you can include originals. Potential 1985 Set in next tweet #
    • Phish used talkback mics before Umphrey's was formed RT: @cwhirsch Talkback mics? Fans pick songs? C'mon. This isn't Umphrey's. #
    • ::faints:: RT @icculusisgod_: @YEMblog tribute set to the 1973 summer jam festival. Covers of the bands who played #
    • And FYI, Steely Dan did the internet fan voting thing before UM and moe. did #
    • re: requests, would be different than moe. and UM in that social media would be used and any song performed is fair game #yembconvo #
    • Interesting! RT: @lifftwit Live soundtrack to a movie. It's been done before, but not at that scale. #
    • ME: I'd like to see them use social media to let fans select songs for one of the sets. Song w/ most "likes" or RTs gets played #
    • Screw safety! RT @noah_s: a set where they're each on top of cars racing around the track? (all safety harnessed and whatnot of course) #
    • Love the Halloween songs that aren't in the rotation idea @samansk and @neddyo #yembconvo #
    • How about "the white tape!" Would love to see Aftermath RT: @SlayterCreative do the white album again 3.0 style #yembconvo #
    • If Phish was to perform a "special" set at a festival this summer ala the acoustic set at #f8 what would u like to see them do? #yembconvo #
    • The Watkins Glen racetrack Facebook Page has a message for us http://on.fb.me/gFLiDh #phish #sb9 #

    Post a Comment

    You must be logged in to post a comment.