<?xml version="1.0" encoding="UTF-8"?><rss version="2.0"
	xmlns:content="http://purl.org/rss/1.0/modules/content/"
	xmlns:dc="http://purl.org/dc/elements/1.1/"
	xmlns:atom="http://www.w3.org/2005/Atom"
	xmlns:sy="http://purl.org/rss/1.0/modules/syndication/"
		>
<channel>
	<title>Comments on: Latest additions to DBIC::Helpers</title>
	<atom:link href="http://blog.afoolishmanifesto.com/archives/1261/feed" rel="self" type="application/rss+xml" />
	<link>http://blog.afoolishmanifesto.com/archives/1261</link>
	<description>fREWdiculous!</description>
	<lastBuildDate>Mon, 16 Aug 2010 06:30:20 +0000</lastBuildDate>
	<sy:updatePeriod>hourly</sy:updatePeriod>
	<sy:updateFrequency>1</sy:updateFrequency>
	<generator>http://wordpress.org/?v=3.0.1</generator>
	<item>
		<title>By: john napiorkowski</title>
		<link>http://blog.afoolishmanifesto.com/archives/1261/comment-page-1#comment-954</link>
		<dc:creator>john napiorkowski</dc:creator>
		<pubDate>Thu, 14 Jan 2010 21:44:21 +0000</pubDate>
		<guid isPermaLink="false">http://blog.afoolishmanifesto.com/?p=1261#comment-954</guid>
		<description>hey,

Meant to message you and will do now before i forget again.  We need a tiny tweak to randomize to make sure the storage specific subclass is loaded correctly, otherwise the dispatch table won&#039;t work:

current:

sub _rand_order_by {
   return $rand_order_by{ref shift-&gt;result_source-&gt;storage} &#124;&#124; &#039;RAND()&#039;;
}

fixed

sub _rand_order_by {
   my $self = shift @_;
    $self-&gt;result_source-&gt;storage-&gt;ensure_connected;
   return $rand_order_by{ref $self-&gt;result_source-&gt;storage} &#124;&#124; &#039;RAND()&#039;;
}

Thanks!  Let me know if you want a &#039;real&#039; patch (feel free to point me at github or something.)</description>
		<content:encoded><![CDATA[<p>hey,</p>
<p>Meant to message you and will do now before i forget again.  We need a tiny tweak to randomize to make sure the storage specific subclass is loaded correctly, otherwise the dispatch table won&#8217;t work:</p>
<p>current:</p>
<p>sub _rand_order_by {<br />
   return $rand_order_by{ref shift-&gt;result_source-&gt;storage} || &#8216;RAND()&#8217;;<br />
}</p>
<p>fixed</p>
<p>sub _rand_order_by {<br />
   my $self = shift @_;<br />
    $self-&gt;result_source-&gt;storage-&gt;ensure_connected;<br />
   return $rand_order_by{ref $self-&gt;result_source-&gt;storage} || &#8216;RAND()&#8217;;<br />
}</p>
<p>Thanks!  Let me know if you want a &#8216;real&#8217; patch (feel free to point me at github or something.)</p>
]]></content:encoded>
	</item>
</channel>
</rss>
