Mojo::DOM::val is deprecated :(

This commit is contained in:
Tianon Gravi 2014-11-14 10:42:21 -07:00
parent 29d35978df
commit b7ae9303dd
1 changed files with 11 additions and 4 deletions

15
push.pl
View File

@ -64,18 +64,25 @@ sub get_form_bits {
my $ret = {};
$form->find('input, select, textarea')->grep(sub {
$form->find('input, textarea')->grep(sub {
!$_->match('input[type=submit], input[type=reset], input[type=button]')
&& defined($_->attr('name'))
})->each(sub {
my $e = shift;
my $name = $e->attr('name');
$ret->{$name} = '' . $e->val;
my $val;
if ($e->type eq 'textarea') {
$ret->{$name} = trim($ret->{$name});
$ret->{$name} =~ s!\r\n|\r!\n!g;
$val = $e->text;
}
else {
$val = $e->attr('value');
}
$val = trim('' . $val);
$val =~ s!\r\n|\r!\n!g;
$ret->{$name} = $val;
});
return $ret;