CGI-Ex-Recipes

 view release on metacpan or  search on metacpan

erecipes/perl/lib/CGI/Ex/Recipes.pm  view on Meta::CPAN

89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
        $self->conf->{template_args},
        $self->conf->{auth_args}
    };
}
 
sub hash_base {
    my $self = shift;
    my $hash = $self->SUPER::hash_base(@_);
    $hash->{'app'} = $self;
    #require Scalar::Util; 
    Scalar::Util::weaken($hash->{'app'});
    return $hash;
}
 
 
sub post_navigate {
    my $self = shift;
    # show what happened
    if (values %{$self->{'debug'}}) {
        debug $self->dump_history if $self->conf->{debug}{dump_history};
        debug $self->conf if $self->conf->{debug}{conf};

erecipes/perl/lib/CGI/Ex/Recipes.pm  view on Meta::CPAN

286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
Returns 0 or 1 depending on configuration for individual steps.
This way we make only some steps to require authentication.
 
=head2 auth_args
 
Get authentication arguments from configuration if there is such
and returns a hashref. The template_args are merged in also.
 
=head2 hash_base
 
The extra work done here is that we use L<Scalar::Util|Scalar::Util> to C<weaken> 
the reference to the main application which we pass for use from within the templates and 
template plugins. Without doing this we may have problems under persistent environments, such as 
mod_perl. This is very handy when you need to dynamically generate HTML or 
use the attached DBI object. 
See L<CGI::Ex::Recipes::Template::Menu|CGI::Ex::Recipes::Template::Menu>, L<CGI::Ex::App|CGI::Ex::App>.
 
=head2 base_dir_abs
 
See also L<CGI::Ex::App|CGI::Ex::App>.

lib/CGI/Ex/Recipes.pm  view on Meta::CPAN

89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
        $self->conf->{template_args},
        $self->conf->{auth_args}
    };
}
 
sub hash_base {
    my $self = shift;
    my $hash = $self->SUPER::hash_base(@_);
    $hash->{'app'} = $self;
    #require Scalar::Util; 
    Scalar::Util::weaken($hash->{'app'});
    return $hash;
}
 
 
sub post_navigate {
    my $self = shift;
    # show what happened
    if (values %{$self->{'debug'}}) {
        debug $self->dump_history if $self->conf->{debug}{dump_history};
        debug $self->conf if $self->conf->{debug}{conf};

lib/CGI/Ex/Recipes.pm  view on Meta::CPAN

286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
Returns 0 or 1 depending on configuration for individual steps.
This way we make only some steps to require authentication.
 
=head2 auth_args
 
Get authentication arguments from configuration if there is such
and returns a hashref. The template_args are merged in also.
 
=head2 hash_base
 
The extra work done here is that we use L<Scalar::Util|Scalar::Util> to C<weaken> 
the reference to the main application which we pass for use from within the templates and 
template plugins. Without doing this we may have problems under persistent environments, such as 
mod_perl. This is very handy when you need to dynamically generate HTML or 
use the attached DBI object. 
See L<CGI::Ex::Recipes::Template::Menu|CGI::Ex::Recipes::Template::Menu>, L<CGI::Ex::App|CGI::Ex::App>.
 
=head2 base_dir_abs
 
See also L<CGI::Ex::App|CGI::Ex::App>.