/** * Test whether we can set the 'auto clear' * option in OODB. * * @return void */ public function testAutoClearHistory() { testpack('Auto clear history'); $book = R::dispense('book'); $book->pages = 100; $book->title = 'book'; R::store($book); $book = R::findOne('book'); asrt($book->hasChanged('title'), FALSE); $book->title = 'yes'; R::store($book); asrt($book->hasChanged('title'), TRUE); OODB::autoClearHistoryAfterStore(TRUE); $book = R::findOne('book'); asrt($book->hasChanged('title'), FALSE); $book->title = 'yes2'; R::store($book); asrt($book->hasChanged('title'), FALSE); OODB::autoClearHistoryAfterStore(FALSE); $book = R::findOne('book'); asrt($book->hasChanged('title'), FALSE); $book->title = 'yes'; R::store($book); asrt($book->hasChanged('title'), TRUE); }