[Bps-public-commit] r17398 - Prophet/trunk/lib/Prophet/Server
jesse at bestpractical.com
jesse at bestpractical.com
Mon Dec 29 00:51:14 EST 2008
Author: jesse
Date: Mon Dec 29 00:51:14 2008
New Revision: 17398
Modified:
Prophet/trunk/lib/Prophet/Server/ViewHelpers.pm
Log:
minor cleanups
Modified: Prophet/trunk/lib/Prophet/Server/ViewHelpers.pm
==============================================================================
--- Prophet/trunk/lib/Prophet/Server/ViewHelpers.pm (original)
+++ Prophet/trunk/lib/Prophet/Server/ViewHelpers.pm Mon Dec 29 00:51:14 2008
@@ -1,8 +1,8 @@
+package Prophet::Server::ViewHelpers;
+
use warnings;
use strict;
-
-package Prophet::Server::ViewHelpers;
use base 'Exporter::Lite';
use Params::Validate qw/validate/;
use Template::Declare::Tags;
@@ -56,8 +56,6 @@
my $w = Prophet::Server::ViewHelpers::ParamFromFunction->new(@_);
$w->render;
return $w;
-
-
}
sub widget {
@@ -66,11 +64,10 @@
return $w;
}
-
BEGIN {
no warnings 'redefine';
*old_form = \&form;
-*form = sub (&;$){
+ *form = sub (&;$){
my $code = shift;
old_form ( sub { attr { method => 'post'};
$code->(@_);
More information about the Bps-public-commit
mailing list