|
Lines 677-683
subtest 'Tests for timestamp handling' => sub {
Link Here
|
| 677 |
|
677 |
|
| 678 |
my $utc_datetime = dt_from_string( undef, undef, 'UTC' ); |
678 |
my $utc_datetime = dt_from_string( undef, undef, 'UTC' ); |
| 679 |
my $utc_timestamp = $utc_datetime->ymd . 'T' . $utc_datetime->hms . 'Z'; |
679 |
my $utc_timestamp = $utc_datetime->ymd . 'T' . $utc_datetime->hms . 'Z'; |
| 680 |
my $timestamp = dt_from_string( undef, 'sql' ); |
680 |
my $timestamp = $utc_datetime; |
| 681 |
|
681 |
|
| 682 |
# Test a bib with one item |
682 |
# Test a bib with one item |
| 683 |
my $biblio1 = $builder->build_sample_biblio; |
683 |
my $biblio1 = $builder->build_sample_biblio; |
|
Lines 774-780
subtest 'Tests for timestamp handling' => sub {
Link Here
|
| 774 |
|
774 |
|
| 775 |
$utc_datetime = dt_from_string( undef, undef, 'UTC' ); |
775 |
$utc_datetime = dt_from_string( undef, undef, 'UTC' ); |
| 776 |
$utc_timestamp = $utc_datetime->ymd . 'T' . $utc_datetime->hms . 'Z'; |
776 |
$utc_timestamp = $utc_datetime->ymd . 'T' . $utc_datetime->hms . 'Z'; |
| 777 |
$timestamp = dt_from_string( undef, 'sql' ); |
777 |
$timestamp = $utc_datetime; |
| 778 |
|
778 |
|
| 779 |
my $item2 = $builder->build_sample_item( { biblionumber => $biblio1->biblionumber } ); |
779 |
my $item2 = $builder->build_sample_item( { biblionumber => $biblio1->biblionumber } ); |
| 780 |
$sth_item->execute( $timestamp, $item2->itemnumber ); |
780 |
$sth_item->execute( $timestamp, $item2->itemnumber ); |
|
Lines 808-814
subtest 'Tests for timestamp handling' => sub {
Link Here
|
| 808 |
set_relative_time(10); |
808 |
set_relative_time(10); |
| 809 |
$utc_datetime = dt_from_string( undef, undef, 'UTC' ); |
809 |
$utc_datetime = dt_from_string( undef, undef, 'UTC' ); |
| 810 |
$utc_timestamp = $utc_datetime->ymd . 'T' . $utc_datetime->hms . 'Z'; |
810 |
$utc_timestamp = $utc_datetime->ymd . 'T' . $utc_datetime->hms . 'Z'; |
| 811 |
$timestamp = dt_from_string( undef, 'sql' ); |
811 |
$timestamp = $utc_datetime; |
| 812 |
|
812 |
|
| 813 |
$sth_metadata->execute( $timestamp, $biblio1->biblionumber ); |
813 |
$sth_metadata->execute( $timestamp, $biblio1->biblionumber ); |
| 814 |
|
814 |
|
| 815 |
- |
|
|