X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FGruntmaster%2FPage%2FPasswd.pm;h=3a7522e4e6393a8a2a2d02cf6beb5105db491317;hb=2e2be9fd67d19611a43a37f39d4bb720f4357cf3;hp=4604fbca9e19c6db972d3d8653f7fce65f62ea80;hpb=31d700150e564fd3bf0eb167ef416c87aed771eb;p=plack-app-gruntmaster.git diff --git a/lib/Gruntmaster/Page/Passwd.pm b/lib/Gruntmaster/Page/Passwd.pm index 4604fbc..3a7522e 100644 --- a/lib/Gruntmaster/Page/Passwd.pm +++ b/lib/Gruntmaster/Page/Passwd.pm @@ -1,17 +1,10 @@ package Gruntmaster::Page::Passwd; -use 5.014000; -use strict; -use warnings; use Gruntmaster::Page::Base; -our @ISA = qw/Gruntmaster::Page::Base/; -our $VERSION = '0.001'; - use Apache2::Authen::Passphrase qw/pwcheck pwset/; -use Plack::Request; sub generate{ - my ($self, $format, $env, $ct, $job, $ext) = @_; + my ($self, $format, $env) = @_; my $r = Plack::Request->new($env); my ($oldpass, $newpass, $confirm) = map {scalar $r->param($_)} 'password', 'new_password', 'confirm_new_password'; @@ -22,6 +15,4 @@ sub generate{ reply 'Password changed successfully'; } -sub variants{ [[reply => 1, undef, undef, undef, undef, undef]] } - 1