On 10/01/2012 08:54 PM, Assaf Gordon wrote:
damien krotkine wrote, On 10/01/2012 09:22 AM:
Can you try to make it work with Dancer2 ? If you need it we can help you making it compliant
Trying to run the example website with Dancer2 gives: === $ cd ./Dancer-Plugin-WindowSession/eg/example $ perl -I/home/gordon/sources/Dancer2/lib/ bin/app.pl Eval went very, very wrong:
# localizing: Dancer::Core::Role::Session::id, Dancer::Core::Role::Engine::type, Dancer::Core::Role::Engine::context, Dancer::Core::Role::Engine::config, Dancer::Core::Role::Session::data, Dancer::Core::Role::Session::name, Dancer::Core::Role::Session::session_secure, Dancer::Core::Role::Session::session_is_http_only, Dancer::Core::Role::Session::session_expires, Dancer::Session::YAML::new { my $isa_check_for_id = ${$_[1][0]->{"\$isa_check_for_id"}}; no warnings 'closure'; sub Dancer::Core::Role::Session::id { (@_> 1 ? do { my ($self, $value) = @_; $isa_check_for_id->($value); $self->{"id"} = $value; } : do { $_[0]->{"id"} = $_[0]->_build_id unless exists $_[0]->{"id"}; $_[0]->{"id"} } ) } $Sub::Quote::QUOTED{"CODE(0x18808b8)"}[3] = \&Dancer::Core::Role::Session::id } ... ... ... [ and the list goes on and on and on until: ] Number found where operator expected at (eval 89) line 18, near "->1" BEGIN failed--compilation aborted at bin/app.pl line 2. ===
Not sure even where to start fixing this...
Please try to use plugin_args inside your plugin (see Dancer::Plugin for more information). Regards Racke -- LinuXia Systems => http://www.linuxia.de/ Expert Interchange Consulting and System Administration ICDEVGROUP => http://www.icdevgroup.org/ Interchange Development Team