From 55b758f56a41fe79587d820bcd5644fad856f0e7 Mon Sep 17 00:00:00 2001
From: Gerhard Gonter <ggonter@gmail.com>
Date: Sun, 25 Dec 2011 09:50:24 +0100
Subject: [PATCH] dont store the historical version twice

---
 perl/Wiki-Confluence/lib/Wiki/Confluence.pm | 11 +++++++++--
 1 file changed, 9 insertions(+), 2 deletions(-)

diff --git a/perl/Wiki-Confluence/lib/Wiki/Confluence.pm b/perl/Wiki-Confluence/lib/Wiki/Confluence.pm
index fd42831..519352c 100644
--- a/perl/Wiki-Confluence/lib/Wiki/Confluence.pm
+++ b/perl/Wiki-Confluence/lib/Wiki/Confluence.pm
@@ -492,8 +492,15 @@ sub hdl_object
     elsif ($x_orig && !$x_hist)
     {
       $status= 'old';
-      $pt_obj= $self->get_page ($x_orig);
-      $pt_obj->{'x_hist'}->{$d_id};
+
+      ## Don't know, why we should record the page id of an historical
+      ## version into the original version again, maybe just to check,
+      ## if the collection "historicalVersion" was complete.  Let's
+      ## keep it commented for now.
+
+      # $pt_obj= $self->get_page ($x_orig);
+      # $pt_obj->{'x_hist'}->{$d_id}++;
+      # push (@{$pt_obj->{'x_hist'}}, $d_id);
     }
     else
     {
-- 
GitLab