|
Lines 19-24
use Modern::Perl;
Link Here
|
| 19 |
|
19 |
|
| 20 |
use Mojo::Base 'Mojolicious::Controller'; |
20 |
use Mojo::Base 'Mojolicious::Controller'; |
| 21 |
|
21 |
|
|
|
22 |
use Koha::DateUtils; |
| 22 |
use Koha::Patrons; |
23 |
use Koha::Patrons; |
| 23 |
|
24 |
|
| 24 |
use Scalar::Util qw(blessed); |
25 |
use Scalar::Util qw(blessed); |
|
Lines 365-370
sub _to_model {
Link Here
|
| 365 |
$patron->{gonenoaddress} = ($patron->{gonenoaddress}) ? 1 : 0; |
366 |
$patron->{gonenoaddress} = ($patron->{gonenoaddress}) ? 1 : 0; |
| 366 |
} |
367 |
} |
| 367 |
|
368 |
|
|
|
369 |
if ( exists $patron->{lastseen} ) { |
| 370 |
$patron->{lastseen} = output_pref({ dt => dt_from_string( $patron->{lastseen} ), dateformat => 'sql' }); |
| 371 |
} |
| 372 |
|
| 373 |
if ( exists $patron->{updated_on} ) { |
| 374 |
$patron->{updated_on} = output_pref({ dt => dt_from_string( $patron->{updated_on} ), dateformat => 'sql' }); |
| 375 |
} |
| 376 |
|
| 368 |
return $patron; |
377 |
return $patron; |
| 369 |
} |
378 |
} |
| 370 |
|
379 |
|
| 371 |
- |
|
|