/usr/share/perl5/Catalyst/Controller/FormBuilder/Action/Mason.pm is in libcatalyst-controller-formbuilder-perl 0.06-2.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | package Catalyst::Controller::FormBuilder::Action::Mason;
use strict;
use base qw/Catalyst::Controller::FormBuilder::Action/;
sub setup_template_vars {
my ( $self, $controller, $c ) = @_;
my $stash_name = $controller->_fb_setup->{stash_name};
$c->stash->{$stash_name} = $controller->_formbuilder->prepare;
$c->stash->{ $controller->_fb_setup->{obj_name} } =
$controller->_formbuilder;
}
1;
|