From 96a3c4d7f8f457f71fd061229e68c937c6c47c72 Mon Sep 17 00:00:00 2001 From: Colin Campbell Date: Fri, 16 Jul 2010 14:14:06 +0100 Subject: [PATCH] Bug 5026 Undefined dates formatted poorly in serials-edit Content-Type: text/plain; charset="utf-8" Makes behaviour consistent with serials-collectiona --- serials/serials-edit.pl | 10 ++++++++-- 1 files changed, 8 insertions(+), 2 deletions(-) diff --git a/serials/serials-edit.pl b/serials/serials-edit.pl index dee624c..8ce3dcb 100755 --- a/serials/serials-edit.pl +++ b/serials/serials-edit.pl @@ -133,8 +133,14 @@ foreach my $tmpserialid (@serialids) { && !$processedserialid{$tmpserialid} ) { my $data = GetSerialInformation($tmpserialid); - $data->{publisheddate} = format_date( $data->{publisheddate} ); - $data->{planneddate} = format_date( $data->{planneddate} ); + for my $date ( qw(publisheddate planneddate)) { + if ($data->{$date} ) { + $data->{$date} = format_date( $data->{$date} ); + } + else { + $data->{$date} = 'XXX'; + } + } $data->{arriveddate}=$today->output('syspref'); $data->{'editdisable'} = ( ( -- 1.7.1.1