Skip to content

Commit

Permalink
POD metadata changes
Browse files Browse the repository at this point in the history
  • Loading branch information
obilodeau committed May 11, 2012
1 parent 35d83bc commit ef55a86
Show file tree
Hide file tree
Showing 2 changed files with 53 additions and 25 deletions.
24 changes: 19 additions & 5 deletions html/configurator/lib/configurator/Controller/Config/Interface.pm
Original file line number Diff line number Diff line change
Expand Up @@ -16,8 +16,6 @@ Catalyst Controller.
=head1 METHODS
=cut

=head2 index
=cut
Expand Down Expand Up @@ -162,14 +160,30 @@ sub end : ActionClass('RenderView') {

=head1 AUTHOR
Francis Lachapelle
Francis Lachapelle <flachapelle@inverse.ca>
Olivier Bilodeau <obilodeau@inverse.ca>
=head1 COPYRIGHT
Copyright 2012 Inverse inc.
=head1 LICENSE
This library is free software. You can redistribute it and/or modify
it under the same terms as Perl itself.
This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
USA.
=cut

Expand Down
54 changes: 34 additions & 20 deletions html/configurator/lib/configurator/Model/Config/Pf.pm
Original file line number Diff line number Diff line change
Expand Up @@ -16,35 +16,20 @@ pfws::Model::Config::Pf - Catalyst Model
Catalyst Model.
=head1 AUTHOR
Francis Lachapelle <flachapelle@inverse.ca>
=head1 METHODS
=head1 LICENSE
=cut

This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.
my $_pf_conf = undef;

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
=item _pf_conf
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
USA.
Load pf.conf into a Config::IniFiles tied hashref
=cut

my $_pf_conf = undef;

sub _pf_conf {
my ($self) = @_;
my $logger = Log::Log4perl::get_logger(__PACKAGE__);
$logger->info("Test");

unless (defined $_pf_conf) {
my %conf;
Expand Down Expand Up @@ -183,6 +168,35 @@ sub add {
return ($TRUE, "Successfully created $interface");
}

=head1 AUTHOR
Francis Lachapelle <flachapelle@inverse.ca>
Olivier Bilodeau <obilodeau@inverse.ca>
=head1 COPYRIGHT
Copyright 2012 Inverse inc.
=head1 LICENSE
This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
USA.
=cut

__PACKAGE__->meta->make_immutable;

1;

0 comments on commit ef55a86

Please sign in to comment.