wee cleanup

This commit is contained in:
Matthew Connelly 2015-11-19 19:53:49 +00:00
parent 45a79a80f3
commit 5f598ee4e9
1 changed files with 2 additions and 4 deletions

View File

@ -40,15 +40,13 @@ sub fill_form {
sub return {
my ( $self, $mech ) = @_;
return (1,$mech->response->header('Location')) if $mech->response->is_redirect;
return (0,'Cannot find URL');
return (1, $mech->response->header('Location')) if $mech->response->is_redirect;
return (0, 'Cannot find URL');
}
sub _credentials { ($ENV{WEREPASTE_USER}, $ENV{WEREPASTE_PASS}) }
1;
__END__
=pod