From 47bfa27b9111ab8cfa6185518b0636e74ce28ca9 Mon Sep 17 00:00:00 2001 From: dakkar Date: Wed, 24 Dec 2008 13:53:59 +0000 Subject: starting handling of changes git-svn-id: svn://luxion/repos/WebCoso/trunk@392 fcb26f47-9200-0410-b104-b98ab5b095f3 --- lib/WebCoso/Common.pm | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'lib/WebCoso/Common.pm') diff --git a/lib/WebCoso/Common.pm b/lib/WebCoso/Common.pm index 31adfbc..cc61d50 100644 --- a/lib/WebCoso/Common.pm +++ b/lib/WebCoso/Common.pm @@ -126,13 +126,15 @@ sub getDates { my %dates; for my $doc_name (uniq(@docs)) { - my $doc=$fc->get($doc_name); + my $xml_name=typedAs($doc_name,'du.xml'); + my $doc=$fc->get($xml_name); my ($creation_date)=map {$_->textContent} $xpath->findnodes( q{/document/docinfo/field[field_name='CreationDate']/field_body}, $doc); $creation_date=DateTime::Format::DateParse->parse_datetime($creation_date); - my $last_change=DateTime->from_epoch($doc->stat->mtime); + my $last_change=DateTime->from_epoch(epoch=> + $fc->stat($doc_name)->mtime); $dates{$doc_name}={creation=>$creation_date, last_change=>$last_change}; } -- cgit v1.2.3