From: Elliott Davis Date: Mon, 19 Mar 2012 20:24:51 +0000 (-0500) Subject: Bug 5549 : fixed datetime issue so time is shown in output for circulation.pl and... X-Git-Tag: v3.08.00~239^2~7 X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=commitdiff_plain;h=49c35ba38eee7bf4880f9975c9b4a5bed5227cc4;p=koha_gimpoz Bug 5549 : fixed datetime issue so time is shown in output for circulation.pl and moremember.pl --- diff --git a/C4/Members.pm b/C4/Members.pm index 1f0ac3f995..6161ac9f30 100644 --- a/C4/Members.pm +++ b/C4/Members.pm @@ -1039,7 +1039,7 @@ sub GetPendingIssues { my $today = DateTime->now( time_zone => $tz); foreach (@{$data}) { if ($_->{issuedate}) { - $_->{issuedate} = dt_from_string($_->{issuedate}. 'sql'); + $_->{issuedate} = dt_from_string($_->{issuedate}, 'sql'); } $_->{date_due} or next; $_->{date_due} = DateTime::Format::DateParse->parse_datetime($_->{date_due}, $tz->name()); diff --git a/circ/circulation.pl b/circ/circulation.pl index 26e20ae16b..082b3d4d0e 100755 --- a/circ/circulation.pl +++ b/circ/circulation.pl @@ -449,7 +449,7 @@ sub build_issue_data { $it->{'itemtype'} = $itemtypeinfo->{'description'}; $it->{'itemtype_image'} = $itemtypeinfo->{'imageurl'}; $it->{'dd'} = output_pref($it->{'date_due'}); - $it->{'displaydate'} = format_date($it->{'issuedate'}); + $it->{'displaydate'} = output_pref($it->{'issuedate'}); #$it->{'od'} = ( $it->{'date_due'} lt $todaysdate ) ? 1 : 0 ; $it->{'od'} = $it->{'overdue'}; ($it->{'author'} eq '') and $it->{'author'} = ' '; diff --git a/members/moremember.pl b/members/moremember.pl index bbad1de60c..c2f0d5305c 100755 --- a/members/moremember.pl +++ b/members/moremember.pl @@ -431,7 +431,6 @@ sub build_issue_data { $issuedate = $issue->{issuedate}->clone(); } - #wtf $issue->{'date_due'} = format_date($issue->[$i]->{issuedate}); $issue->{date_due} = output_pref( $issue->{date_due} ); $issue->{issuedate} = output_pref( $issue->{issuedate} ) if defined $issue->{issuedate}; my $biblionumber = $issue->{biblionumber};