starting handling of changes

git-svn-id: svn://luxion/repos/WebCoso/trunk@392 fcb26f47-9200-0410-b104-b98ab5b095f3

1 files changed, 4 insertions, 2 deletions

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};
     }