Dancer2-Plugin-Interchange6

 view release on metacpan or  search on metacpan

CHANGES  view on Meta::CPAN

0.203 Wed  3 Aug 17:25:41 CEST 2016

    [ENHANCEMENTS]

    * Main plugin needs access to the Schema's current_user so move stashing
      of user in Schema from Routes to main plugin class.

    [BUG FIXES]

    * Add dep on Scalar::Utils for weaken method.

    [TESTS]

    * Remove pg_enable_utf8 from Pg tests - closes issue #1.
    * Omit BUILD from pod-coverage.

0.202 Wed 22 Jun 15:10:19 CEST 2016

    [ENHANCEMENTS]

Makefile.PL  view on Meta::CPAN

                  'Dancer2::Plugin::Auth::Extensible' => '0.600',
                  'Dancer2::Plugin::Auth::Extensible::Provider::DBIC' => '0.600',
                  'Business::OnlinePayment' => 3.02,
                  'Module::Runtime' => 0,
                  'MooseX::CoverableModifiers' => 0,
                  'namespace::clean' => 0,
                  # Net::HTTPS::Any is required by Business::OnlinePayment but
                  # versions before 0.11 have a habit of failing to install
                  # so add this dep to make installing DPIC6 more reliable
                  'Net::HTTPS::Any' => '0.11', # 
                  'Scalar::Util' => 0, # weaken
    },
    dist                => { COMPRESS => 'gzip -9f', SUFFIX => 'gz', },
    clean               => { FILES => 'Dancer2-Plugin-Interchange6-*' },
    test                => { TESTS => join( ' ', (glob( 't/*.t'), glob('t/*/*.t')))},
    META_MERGE        => {
        resources => {
            repository  => 'https://github.com/interchange/Dancer2-Plugin-Interchange6.git',
            bugtracker => 'https://github.com/interchange/Dancer2-Plugin-Interchange6/issues',
            IRC => 'irc://irc.freenode.net/#interchange',
        },

lib/Dancer2/Plugin/Interchange6.pm  view on Meta::CPAN

package Dancer2::Plugin::Interchange6;

use strict;
use warnings;

use Dancer2::Plugin;
use Dancer2::Plugin::Interchange6::Business::OnlinePayment;
use Module::Runtime 'use_module';
use Scalar::Util 'weaken';

=head1 NAME

Dancer2::Plugin::Interchange6 - Interchange6 Shop Plugin for Dancer2

=head1 VERSION

Version 0.204

=cut

lib/Dancer2/Plugin/Interchange6.pm  view on Meta::CPAN

  'shop_navigation',
  'shop_order',
  'shop_product',
  'shop_redirect',
  'shop_schema',
  'shop_state',
  'shop_user';

sub BUILD {
    my $plugin = shift;
    weaken ( my $weak_plugin = $plugin );
    $plugin->app->add_hook(
        Dancer2::Core::Hook->new(
            name => 'before',
            code => sub {
                # D2PAE::Provider::DBIC returns logged_in_user as hashref
                # instead of a proper user result so we have to mess about.
                # At some point in the future D2PAE will be fixed to allow
                # user objects to be returned.
                my $user = $weak_plugin->logged_in_user || undef;
                if ( $user ) {