<html><head><meta http-equiv="Content-Type" content="text/html charset=windows-1252"></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;">Hi,<div><br></div><div>I’m getting a bit confused with plugins.  I’m sure that I was able to use the DBIC Plugin at one point from one of my plugins, but I can’t seem to get it to  work in 0.159002 or 0.160000.  DBIC seems to be okay outside of plugins.</div><div><br></div><div>3 questions:</div><div>* why does it complain about "Plugin calls 'dsl' instead of '$dsl->dsl’" when I appear to be using '$dsl->dsl’?</div><div>* how do I get DBIC to print the SQL it’s executing so I can double check it’s what I’m expecting?</div><div>* am I doing something else wrong in the way I’m trying to use DBIC?</div><div><br></div><div>Basically this is the code in my plugin:</div><div><br></div><div><div>register get_topics => sub {</div><div>    my $dsl = shift;</div><div>    my $type = shift;</div><div>    my $application = shift;</div><div>    my $pageid = shift;</div><div>    my $dberr = 0;</div><div><br></div><div>    my $current;</div><div>    my $urlref;</div><div>    my $template = "";</div><div>    my $id;</div><div>    </div><div>    my @topics;</div><div>    $dsl->debug( "**** Here 1 ****");</div><div>    eval { @topics = $dsl->schema->resultset('ContentType')->search({ application => $application }, { prefetch => [ 'content_type_names' ], order_by => 'sort_order' }) };</div><div>    $dberr += $dsl->check_db_result( $dsl, $@, __LINE__ );</div><div><div>    $dsl->debug( "**** Here 2 **** " . @topics);</div></div><div><br></div><div> etc, etc</div><div>}</div><div><br></div><div>The output in the console is this:</div><div><br></div><div><div>[Routes:37674] core @2015-04-27 21:57:16> Entering hook core.app.before_request in (eval 87) l. 1</div><div>[Routes:37674] debug @2015-04-27 21:57:16> **** Here 1 **** in /code/Dancer/MediBase/bin/../lib/QTechLib/Plugin.pm l. 31</div><div>DEPRECATED: QTechLib::Plugin calls 'dsl' instead of '$dsl->dsl'. at /perf/perl/lib/perl5/Dancer2/Plugin/DBIC.pm line 13.</div><div>[Routes:37674] debug @2015-04-27 21:57:16> ######Dancer2::Core::DSL__WITH__Dancer2::Plugin::DBIC__WITH__Dancer2::Plugin::Ajax__WITH__QTechLib::L12N::Plugin__WITH__QTechLib::Plugin=HASH(0x3a05a88)###### at line: in /code/Dancer/MediBase/bin/../lib/QTechLib/Plugin.pm l. 66</div><div>[Routes:37674] debug @2015-04-27 21:57:16> **** Here 2 ****  in /code/Dancer/MediBase/bin/../lib/QTechLib/Plugin.pm l. 31</div></div><div><br></div><div>Here 2 should print the number of topics - which should be greater than zero.</div><div><br></div><div><br></div><div apple-content-edited="true">
<div style="color: rgb(0, 0, 0); letter-spacing: normal; orphans: auto; text-align: start; text-indent: 0px; text-transform: none; white-space: normal; widows: auto; word-spacing: 0px; -webkit-text-stroke-width: 0px; word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;"><div style="color: rgb(0, 0, 0); letter-spacing: normal; orphans: auto; text-align: start; text-indent: 0px; text-transform: none; white-space: normal; widows: auto; word-spacing: 0px; -webkit-text-stroke-width: 0px; word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;"><div style="margin: 0px;"><font face="Times New Roman"><i>with thanks,</i></font></div><div style="margin: 0px;"><font face="Times New Roman"><i>Matt</i></font></div><div style="margin: 0px; font-size: 12px; min-height: 14px;"><br></div></div></div><br class="Apple-interchange-newline"><br class="Apple-interchange-newline">
</div>
<br></div></body></html>