Permalink
Browse files

Item945: added unit test to verify history compatibility between RcsW…

…rap and RcsLite, but can't seem to reproduce the reported problem

git-svn-id: http://svn.foswiki.org/trunk@2412 0b4bb1d4-4e5a-0410-9cc4-b2b747904278
  • Loading branch information...
CrawfordCurrie CrawfordCurrie
CrawfordCurrie authored and CrawfordCurrie committed Feb 8, 2009
1 parent bd889ea commit cf94c6f44bb93406b0ded912788323f4c8ab4327
Showing with 16 additions and 0 deletions.
  1. +16 −0 UnitTestContrib/test/unit/RcsTests.pm
@@ -679,4 +679,20 @@ sub verify_Item3122 {
$this->assert_equals("old", $text);
}
# Verify data compatibility between RcsLite and RcsWrap
sub test_Item945 {
my( $this ) = @_;
my $rcsWrap = new Foswiki::Store::RcsWrap($twiki, $testWeb, 'PinkPen');
my $rcsLite = new Foswiki::Store::RcsLite($twiki, $testWeb, 'PinkPen');
$rcsWrap->addRevisionFromText("old\nwrap text\n", "one", "iron", time());
$rcsWrap->addRevisionFromText("new\nwrap text\n", "two", "tin", time());
# $rcsWrap->numRevisions invokes histCmd, which is an rlog
$this->assert_equals(2, $rcsWrap->numRevisions());
$this->assert_equals(2, $rcsLite->numRevisions());
$rcsLite->addRevisionFromText("old\nlite text\n", "tre", "zinc", time());
$rcsLite->addRevisionFromText("new\nlite text\n", "for", "gold", time());
$this->assert_equals(4, $rcsWrap->numRevisions());
$this->assert_equals(4, $rcsLite->numRevisions());
}
1;

0 comments on commit cf94c6f

Please sign in to comment.