rtm-majortom 0.3.1-java

data/lib/rtm/majortom/sugar.rb

@@ -0,0 +1,10 @@
+# Copyright: Copyright 2009 Topic Maps Lab, University of Leipzig.
+# License:   Apache License, Version 2.0
+
+module RTM::Majortom; end
+
+module RTM::Majortom::Sugar;end
+
+require File.join(File.dirname(__FILE__), '/sugar/topic_map')
+
+RTM::TopicMap.register_extension(RTM::Majortom::Sugar::TopicMap)

data/lib/rtm/majortom/sugar/topic_map.rb

@@ -0,0 +1,74 @@
+# Copyright: Copyright 2009 Topic Maps Lab, University of Leipzig.
+# License:   Apache License, Version 2.0
+
+module RTM::Majortom::Sugar
+  module TopicMap
+
+    def latest_revision_id
+      raise("not supported") if self.read_only?
+      return 0 unless last_revision = revision_index.last_revision
+      last_revision.getId
+    end
+
+    # Returns all revisions in the revision_index starting with the last one
+    def all_revisions
+      all_revisions = []
+      revision = self.revision_index.last_revision
+      if revision
+        all_revisions << revision
+        while revision = revision.past
+          all_revisions << revision
+        end
+      end
+      return all_revisions
+    end
+    
+    # Calls and loads the RevisionIndex managed by MaJorToM.
+    def revision_index
+      index = getIndex(Java::DeTopicmapslabMajortomModelIndex::IRevisionIndex.java_class)
+      index.open unless index.is_open
+      return index
+    end
+
+    # Calls and loads the SupertypeSubtypeIndex managed by MaJorToM.
+    def supertype_subtype_index
+      index = getIndex(Java::DeTopicmapslabMajortomModelIndex::ISupertypeSubtypeIndex.java_class)
+      index.open unless index.is_open
+      return index
+    end
+
+    # Calls and loads the TransitiveTypeInstanceIndex managed by MaJorToM.
+    def transitive_type_instance_index
+      index = getIndex(Java::DeTopicmapslabMajortomModelIndex::ITransitiveTypeInstanceIndex.java_class)
+      index.open unless index.is_open
+      return index
+    end
+
+    def register_tmql_environment_map(topic_map)
+      raise("topic_map must be a topic map") unless topic_map.is_a?(RTM::TopicMap)
+      if self.store.is_read_only
+        self.store.registerTMQLEnvironmentMap(topic_map)
+      else
+        raise("Method only working on read-only topic maps.")
+      end
+    end
+    alias :registerTMQLEnvironmentMap :register_tmql_environment_map
+
+    def tmql_environment_map
+      if self.store.is_read_only
+        self.store.getTMQLEnvironmentMap
+      else
+        raise("Method only working on read-only topic maps.")
+      end
+    end
+    alias :getTMQLEnvironmentMap :tmql_environment_map
+
+    def enable_revision_management
+      self.store.enable_revision_management(true)
+    end
+
+    def disable_revision_management
+      self.store.enable_revision_management(false)
+    end
+  end
+end

data/lib/rtm/revision.rb

@@ -0,0 +1,168 @@
+# Copyright: Copyright 2009 Topic Maps Lab, University of Leipzig.
+# License:   Apache License, Version 2.0
+
+module RTM::Revision
+  Type = Java::DeTopicmapslabMajortomModelEvent::TopicMapEventType
+  
+  def self.specify_event(type)
+    return (
+      case type
+      when Type::ASSOCIATION_ADDED
+        :creation
+      when Type::ASSOCIATION_REMOVED
+        :deletion
+      when Type::DATATYPE_SET
+        :update
+      when Type::ID_MODIFIED
+        :update
+      when Type::ITEM_IDENTIFIER_ADDED
+        :update
+      when Type::ITEM_IDENTIFIER_REMOVED
+        :update
+      when Type::MERGE
+        :update
+      when Type::NAME_ADDED
+        :update
+      when Type::NAME_REMOVED
+        :update
+      when Type::OCCURRENCE_ADDED
+        :update
+      when Type::OCCURRENCE_REMOVED
+        :update
+      when Type::PLAYER_MODIFIED
+        :update
+      when Type::REIFIER_SET
+        :update
+      when Type::REMOVE_DUPLICATES
+        :update
+      when Type::ROLE_ADDED
+        :update
+      when Type::ROLE_REMOVED
+        :update
+      when Type::SCOPE_MODIFIED
+        :update
+      when Type::SUBJECT_IDENTIFIER_ADDED
+        :update
+      when Type::SUBJECT_IDENTIFIER_REMOVED
+        :update
+      when Type::SUBJECT_LOCATOR_ADDED
+        :update
+      when Type::SUBJECT_LOCATOR_REMOVED
+        :update
+      when Type::TOPIC_ADDED
+        :creation
+      when Type::TOPIC_REMOVED
+        :deletion
+      when Type::TYPE_ADDED
+        :update
+      when Type::TYPE_REMOVED
+        :update
+      when Type::TYPE_SET
+        :update
+      when Type::VALUE_MODIFIED
+        :update
+      when Type::VARIANT_ADDED
+        :update
+      when Type::VARIANT_REMOVED
+        :update
+      else
+        nil
+      end )
+  end
+
+  def self.topic_or_association_context(revision)
+    # TODO not finished yet, test it also in the history_spec
+    type = revision.changeset_type
+    changeset = revision.changeset
+    
+    case type
+    when Type::ASSOCIATION_ADDED
+      context = changeset.first.new_value # association
+    when Type::ASSOCIATION_REMOVED
+      context = changeset.last.old_value # association
+    when Type::DATATYPE_SET
+      datatype_aware = changeset.first.context
+      if datatype_aware.is_a?(RTM::Occurrence)
+        context = datatype_aware.parent # topic
+      else
+        context = datatype_aware.parent.parent # topic
+      end
+    when Type::ID_MODIFIED
+      return nil
+    when Type::ITEM_IDENTIFIER_ADDED
+      context = changeset.first.context # topic
+    when Type::ITEM_IDENTIFIER_REMOVED
+      context = changeset.first.context # topic
+    when Type::MERGE
+      return nil
+    when Type::NAME_ADDED
+      context = changeset.first.context # topic
+    when Type::NAME_REMOVED
+      context = changeset.last.context # topic
+    when Type::OCCURRENCE_ADDED
+      context = changeset.first.context # topic
+    when Type::OCCURRENCE_REMOVED
+      context = changeset.last.context # topic
+    when Type::PLAYER_MODIFIED
+      context = changeset.first.context.parent # association
+    when Type::REIFIER_SET
+      return nil
+    when Type::REMOVE_DUPLICATES
+      return nil
+    when Type::ROLE_ADDED
+      context = changeset.first.context # association
+    when Type::ROLE_REMOVED
+      context = changeset.last.context # association
+    when Type::SCOPE_MODIFIED
+      typed = changeset.first.context
+      if typed.is_a?(RTM::Variant)
+        context = typed.parent.parent # topic
+      elsif typed.is_a?(RTM::Occurrence)
+        context = typed.parent # topic
+      elsif typed.is_a?(RTM::Name)
+        context = typed.parent # topic
+      else
+        context = typed # association
+      end
+    when Type::SUBJECT_IDENTIFIER_ADDED
+      context = changeset.first.context # topic
+    when Type::SUBJECT_IDENTIFIER_REMOVED
+      context = changeset.first.context # topic
+    when Type::SUBJECT_LOCATOR_ADDED
+      context = changeset.first.context # topic
+    when Type::SUBJECT_LOCATOR_REMOVED
+      context = changeset.first.context # topic
+    when Type::TOPIC_ADDED
+      context = changeset.first.new_value # topic
+    when Type::TOPIC_REMOVED
+      context = changeset.last.old_value # topic
+    when Type::TYPE_ADDED
+      context = changeset.first.context # topic
+    when Type::TYPE_REMOVED
+      context = changeset.first.context # topic
+    when Type::TYPE_SET
+      typed = changeset.first.context
+      if typed.is_a?(RTM::Role)
+        context = typed.parent # association
+      elsif typed.is_a?(RTM::Association)
+        context = typed # association
+      else
+        context = typed.parent # topic
+      end
+    when Type::VALUE_MODIFIED
+      valued = changeset.first.context
+      if valued.is_a?(RTM::Variant)
+        context = valued.parent.parent #topic
+      else
+        context = valued.parent # topic
+      end
+    when Type::VARIANT_ADDED
+      context = changeset.first.context.parent # topic
+    when Type::VARIANT_REMOVED
+      context = changeset.last.context.parent # topic
+    else
+      return nil
+    end
+    return context
+  end
+end

data/spec/common/best_label_spec.rb

@@ -0,0 +1,149 @@
+# Copyright: Copyright 2009 Topic Maps Lab, University of Leipzig.
+# License:   Apache License, Version 2.0
+
+require File.dirname(__FILE__) + '/../spec_helper'
+
+module RTM::Majortom::Sugar::Topic
+  describe self do
+    before(:each) do
+      @tm = get_used_tm_sys_tm
+      @tm.clear
+    end
+    after(:each) do
+      @tm.close
+    end
+
+    describe "#best_label with special examples" do
+      it "should give back an identifier if the name is empty" do
+        topic = @tm.get!("Leipzig")
+        topic.create_name("")
+        topic.best_label.should == "http://www.topicmapslab.de/Leipzig"
+      end
+      it "should give back the shorter value" do
+        topic = @tm.get!("Leipzig")
+        topic.create_name("Le ipzig in Sachsen", ["long"])
+        topic.create_name("Short", ["short"])
+        topic.best_label.should == "Short"
+      end
+      it "should give back the shorter value" do
+        topic = @tm.get!("Leipzig")
+        topic.create_name("Le ipzig in Sachsen", ["long", "theme"])
+        topic.create_name("Short", ["short", "theme"])
+        topic.best_label("theme").should == "Short"
+      end
+      it "should handle Berlin in the totTM" do
+        @tm.clear
+        @tm.from_xtm(File.join(File.dirname(__FILE__), "/../../../rtm/spec/resources/toyTM.xtm"))
+        berlin = @tm.get("http://en.wikipedia.org/wiki/Berlin")
+        berlin.should_not be_nil
+        berlin.best_label.should == "Berlin"
+      end
+      describe "should handle topic with only a" do
+        it "item identifier" do
+          t = @tm.get!("ii:an_item_identifier")
+          t.best_label.should == "http://www.topicmapslab.de/an_item_identifier"
+          t.best_label("theme").should == "http://www.topicmapslab.de/an_item_identifier"
+          @tm.get!("theme")
+          t.best_label("theme").should == "http://www.topicmapslab.de/an_item_identifier"
+        end
+        it "subject identifier" do
+          t = @tm.get!("si:a_subject_identifier")
+          t.best_label.should == "http://www.topicmapslab.de/a_subject_identifier"
+          t.best_label("theme").should == "http://www.topicmapslab.de/a_subject_identifier"
+          @tm.get!("theme")
+          t.best_label("theme").should == "http://www.topicmapslab.de/a_subject_identifier"
+        end
+        it "subject locator" do
+          t = @tm.get!("sl:a_subject_locator")
+          t.best_label.should == "http://www.topicmapslab.de/a_subject_locator"
+          t.best_label("theme").should == "http://www.topicmapslab.de/a_subject_locator"
+          @tm.get!("theme")
+          t.best_label("theme").should == "http://www.topicmapslab.de/a_subject_locator"
+        end
+      end
+      describe "should handle the toyTM including michael jackson" do
+        it "should give back the best_label of all topics" do
+          @tm.clear
+          @tm.from_xtm(File.join(File.dirname(__FILE__), "/../../../rtm/spec/resources/toyTM_MJ.xtm"))
+
+          creator = @tm.get!("http://en.wikipedia.org/wiki/Creator")
+          lit = @tm.get!("http://en.wikipedia.org/wiki/Lithuania")
+
+          creator.best_label(lit).should == "Creator"
+
+#          @tm.topics.each do |t|
+#            puts "++++++++++"
+#            t.best_label
+#            @tm.topics.each do |theme|
+#              begin
+#                t.best_label(theme)
+#              rescue
+#                puts t.reference
+#                #puts t.names.first
+#                puts theme.reference
+#
+#              end
+#            end
+#          end
+        end
+      end
+    end
+
+    describe "#best_label" do
+      before(:each) do
+        @topic = @tm.get!("Leipzig")
+        @topic.add_si("LE")
+        @topic.add_ii("http://example.org/id-10")
+        @topic.add_ii("1")
+      end
+      after(:each) do
+        @topic.best_label.should be_a_kind_of String
+      end
+      it "should return an identfier if the topic has no name, resolved" do
+        @topic.best_label.should == "http://www.topicmapslab.de/LE"
+      end
+      it "should give back the name if the topic has one name" do
+        @topic["-city-name"] = "Leipzig"
+        @topic.best_label.should == "Leipzig"
+      end
+      it "should give back the default name if the topic has several names" do
+        @topic["-city-name"] = "Leipzig"
+        @topic["-"] = "Leipzisch"
+        @topic.best_label.should == "Leipzisch"
+      end
+      it "should give back the default name with the smallest value if the topic has several names" do
+        @topic["-city-name"] = "Leipzig"
+        @topic["-"] = "LE"
+        @topic["-"] = "Leipzisch"
+        @topic["-"] = "A Schone Stadt"
+        @topic.best_label.should == "LE"
+      end
+      it "should give back the default name with the smallest value sorted alphabetically if the topic has several names" do
+        @topic["-city-name"] = "Leipzig"
+        @topic["-"] = "LE"
+        @topic["-"] = "Leipzisch"
+        @topic["-"] = "LA"
+        @topic.best_label.should == "LA"
+      end
+      it "should give back the name with the given theme" do
+        @topic["-city-name name @test_theme"] = "Leipzig"
+        @topic["-"] = "LE"
+        @topic["-"] = "Leipzisch"
+        @topic["-"] = "LA"
+        test_theme = @tm.get("test_theme")
+        test_theme.should_not be_nil
+        @topic.best_label(test_theme).should == "Leipzig"
+      end
+      it "should give back the name with the given theme preferring default names" do
+        @topic["-city-name name @test_theme"] = "Leipzig"
+        @topic["-"] = "LE"
+        @topic["- @test_theme"] = "Leipzisch"
+        @topic["- @test_theme_other"] = "LA"
+        test_theme = @tm.get("test_theme")
+        test_theme.should_not be_nil
+        @topic.best_label(test_theme).should == "Leipzisch"
+      end
+    end
+
+  end
+end

data/spec/common/history_spec.rb

@@ -0,0 +1,936 @@
+# Copyright: Copyright 2009 Topic Maps Lab, University of Leipzig.
+# License:   Apache License, Version 2.0
+
+require File.dirname(__FILE__) + '/../spec_helper'
+
+module RTM::TopicMap
+  describe self do
+    before(:each) do
+      @tm = get_used_tm_sys_tm
+      @tm.should be_a_kind_of RTM::TopicMap
+      @tm.clear
+      @tm.revision_index.first_revision.should be_nil
+    end
+    after(:each) do
+      if implementation_for_spec == :majortom_db
+        @tm.remove
+      else
+        @tm.close
+      end
+    end
+
+    describe "the id of a revision" do
+      it "should not be 0" do
+        @tm.revision_index.last_revision.should be_nil
+        @tm.get!("topic")
+        @tm.revision_index.last_revision.should_not be_nil
+        @tm.revision_index.last_revision.getId.should_not == 0
+        pending "not working for db" do
+          @tm.revision_index.last_revision.getId.should == 1
+        end if implementation_for_spec == :majortom_db
+      end
+      it "should be return via latest_revision_id" do
+        @tm.revision_index.last_revision.should be_nil
+        @tm.latest_revision_id.should == 0
+        @tm.get!("topic")
+        @tm.revision_index.last_revision.should_not be_nil
+        pending "not working for db" do
+          @tm.latest_revision_id.should == 1
+        end if implementation_for_spec == :majortom_db
+      end
+    end
+
+    describe "#all_revisions" do
+      it "should be callable on an empty topic map" do
+        @tm.all_revisions.should be_empty
+      end
+      it "should give back all revisions in the revision index" do
+
+        # ... will be filled
+      end
+    end
+
+    describe "Revisions" do
+      describe "should work properly" do
+        it "when adding a topic with si" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          topic1 = @tm.get!("topic1")
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "TOPIC_ADDED"
+          RTM::Revision.topic_or_association_context(last_revision).should == topic1
+          changeset = last_revision.changeset
+          changeset.size.should == 2
+          change1 = changeset.first
+          change1.type.to_s.should == "TOPIC_ADDED"
+          change1.context.should == @tm
+          change2 = changeset.last
+          change2.type.to_s.should == "SUBJECT_IDENTIFIER_ADDED"
+          change2.context.should == topic1
+        end
+        it "when adding a topic with sl" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          topic1 = @tm.get!("sl:topic1")
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "TOPIC_ADDED"
+          RTM::Revision.topic_or_association_context(last_revision).should == topic1
+          changeset = last_revision.changeset
+          changeset.size.should == 2
+          change1 = changeset.first
+          change1.type.to_s.should == "TOPIC_ADDED"
+          change1.context.should == @tm
+          change2 = changeset.last
+          change2.type.to_s.should == "SUBJECT_LOCATOR_ADDED"
+          change2.context.should == topic1
+        end
+        it "when adding a topic with ii" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          topic1 = @tm.get!("ii:topic1")
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "TOPIC_ADDED"
+          RTM::Revision.topic_or_association_context(last_revision).should == topic1
+          changeset = last_revision.changeset
+          changeset.size.should == 2
+          change1 = changeset.first
+          change1.type.to_s.should == "TOPIC_ADDED"
+          change1.context.should == @tm
+          change2 = changeset.last
+          change2.type.to_s.should == "ITEM_IDENTIFIER_ADDED"
+          change2.context.should == topic1
+        end
+        it "when adding a topic with nothing" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          topic1 = @tm.create_topic
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "TOPIC_ADDED"
+          RTM::Revision.topic_or_association_context(last_revision).should == topic1
+          changeset = last_revision.changeset
+          changeset.size.should == 2
+          change1 = changeset.first
+          change1.type.to_s.should == "TOPIC_ADDED"
+          change1.context.should == @tm
+          change2 = changeset.last
+          change2.type.to_s.should == "ITEM_IDENTIFIER_ADDED"
+          change2.context.should == topic1
+        end
+        it "when adding an association" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          @tm.get!("assoc_type")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          assoc = @tm.create_association("assoc_type")
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "ASSOCIATION_ADDED"
+          RTM::Revision.topic_or_association_context(last_revision).should == assoc
+          changeset = last_revision.changeset
+          changeset.size.should == 3
+          change1 = changeset.first
+          change1.type.to_s.should == "ASSOCIATION_ADDED"
+          change1.context.should == @tm
+          change2 = changeset.get(1)
+          change2.type.to_s.should == "TYPE_SET"
+          change2.context.should == assoc
+          change3 = changeset.last
+          change3.type.to_s.should == "SCOPE_MODIFIED"
+          change3.context.should == assoc
+        end
+        it "when adding a role to an association" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          @tm.get!("assoc_type")
+          @tm.get!("role_type")
+          @tm.get!("role_player")
+          assoc = @tm.create_association("assoc_type")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          role = assoc.create_role("role_type", "role_player")
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "ROLE_ADDED"
+          RTM::Revision.topic_or_association_context(last_revision).should == assoc
+          changeset = last_revision.changeset
+          changeset.size.should == 3
+          change1 = changeset.first
+          change1.type.to_s.should == "ROLE_ADDED"
+          change1.context.should == assoc
+          change2 = changeset.get(1)
+          change2.type.to_s.should == "TYPE_SET"
+          change2.context.should == role
+          change3 = changeset.last
+          change3.type.to_s.should == "PLAYER_MODIFIED"
+          change3.context.should == role
+        end
+        it "when adding a type to a topic" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic = @tm.get!("topic")
+          type = @tm.get!("type")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          topic.add_type("type")
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "TYPE_ADDED"
+          RTM::Revision.topic_or_association_context(last_revision).should == topic
+          changeset = last_revision.changeset
+          changeset.size.should == 1
+          change = changeset.first
+          change.type.to_s.should == "TYPE_ADDED"
+          change.context.should == topic
+        end
+        it "when removing a type from a topic" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic = @tm.get!("topic")
+          type = @tm.get!("type")
+          topic.add_type("type")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          topic.remove_type("type")
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "TYPE_REMOVED"
+          RTM::Revision.topic_or_association_context(last_revision).should ==  topic
+          changeset = last_revision.changeset
+          changeset.size.should == 1
+          change = changeset.first
+          change.type.to_s.should == "TYPE_REMOVED"
+          change.context.should == topic
+        end
+        it "when adding a name to a topic" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic = @tm.get!("topic")
+          nametype = @tm.get!("nametype")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          name = topic.create_name(nametype, "a Name")
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "NAME_ADDED"
+          RTM::Revision.topic_or_association_context(last_revision).should == topic
+          changeset = last_revision.changeset
+          changeset.size.should == 4
+          change1 = changeset.first
+          change1.type.to_s.should == "NAME_ADDED"
+          change1.context.should == topic
+          change2 = changeset.get(1)
+          change2.type.to_s.should == "TYPE_SET"
+          change2.context.should == name
+          change3 = changeset.get(2)
+          change3.type.to_s.should == "VALUE_MODIFIED"
+          change3.context.should == name
+          change4 = changeset.last
+          change4.type.to_s.should == "SCOPE_MODIFIED"
+          change4.context.should == name
+        end
+        it "when adding a variant to a name" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic = @tm.get!("topic")
+          nametype = @tm.get!("nametype")
+          name = topic.create_name(nametype, "a Name")
+          @tm.get!("theme")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          variant = name.create_variant("a Variant", ["theme"])
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "VARIANT_ADDED"
+          RTM::Revision.topic_or_association_context(last_revision).should == topic
+          changeset = last_revision.changeset
+          changeset.size.should == 4
+          change1 = changeset.first
+          change1.type.to_s.should == "VARIANT_ADDED"
+          change1.context.should == name
+          change2 = changeset.get(1)
+          change2.type.to_s.should == "VALUE_MODIFIED"
+          change2.context.should == variant
+          change3 = changeset.get(2)
+          change3.type.to_s.should == "DATATYPE_SET"
+          change3.context.should == variant
+          change4 = changeset.last
+          change4.type.to_s.should == "SCOPE_MODIFIED"
+          change4.context.should == variant
+        end
+        it "when adding a occurrence to a topic" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic = @tm.get!("topic")
+          occtype = @tm.get!("occtype")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          occ = topic.create_occurrence(occtype, "a Name")
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "OCCURRENCE_ADDED"
+          RTM::Revision.topic_or_association_context(last_revision).should == topic
+          changeset = last_revision.changeset
+          changeset.size.should == 5
+          change1 = changeset.first
+          change1.type.to_s.should == "OCCURRENCE_ADDED"
+          change1.context.should == topic
+          change2 = changeset.get(1)
+          change2.type.to_s.should == "TYPE_SET"
+          change2.context.should == occ
+          change3 = changeset.get(2)
+          change3.type.to_s.should == "VALUE_MODIFIED"
+          change3.context.should == occ
+          change4 = changeset.get(3)
+          change4.type.to_s.should == "DATATYPE_SET"
+          change4.context.should == occ
+          change5 = changeset.last
+          change5.type.to_s.should == "SCOPE_MODIFIED"
+          change5.context.should == occ
+        end
+        it "when removing a si from a topic" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic1 = @tm.get!("topic1")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          topic1.remove_si("topic1")
+          topic1.references.should be_empty
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "SUBJECT_IDENTIFIER_REMOVED"
+          RTM::Revision.topic_or_association_context(last_revision).should == topic1
+          changeset = last_revision.changeset
+          changeset.size.should == 1
+          change1 = changeset.first
+          change1.type.to_s.should == "SUBJECT_IDENTIFIER_REMOVED"
+          change1.context.should == topic1
+        end
+        it "when removing an ii from a topic" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic1 = @tm.get!("ii:topic1")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          topic1.remove_ii("topic1")
+          topic1.references.should be_empty
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "ITEM_IDENTIFIER_REMOVED"
+          RTM::Revision.topic_or_association_context(last_revision).should == topic1
+          changeset = last_revision.changeset
+          changeset.size.should == 1
+          change1 = changeset.first
+          change1.type.to_s.should == "ITEM_IDENTIFIER_REMOVED"
+          change1.context.should == topic1
+          last_revision.changeset.first.context.should be_a_kind_of RTM::Topic
+        end
+        it "when removing a sl from a topic" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic1 = @tm.get!("sl:topic1")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          topic1.remove_sl("topic1")
+          topic1.references.should be_empty
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "SUBJECT_LOCATOR_REMOVED"
+          RTM::Revision.topic_or_association_context(last_revision).should == topic1
+          changeset = last_revision.changeset
+          changeset.size.should == 1
+          change1 = changeset.first
+          change1.type.to_s.should == "SUBJECT_LOCATOR_REMOVED"
+          change1.context.should == topic1
+        end
+        it "when adding a si from a topic" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic1 = @tm.get!("topic1")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          topic1.add_si("topic_identifier2")
+          topic1.should have(2).references
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "SUBJECT_IDENTIFIER_ADDED"
+          RTM::Revision.topic_or_association_context(last_revision).should == topic1
+          changeset = last_revision.changeset
+          changeset.size.should == 1
+          change1 = changeset.first
+          change1.type.to_s.should == "SUBJECT_IDENTIFIER_ADDED"
+          change1.context.should == topic1
+        end
+        it "when adding an ii from a topic" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic1 = @tm.get!("ii:topic1")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          topic1.add_ii("topic_identifier2")
+          topic1.should have(2).references
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "ITEM_IDENTIFIER_ADDED"
+          RTM::Revision.topic_or_association_context(last_revision).should == topic1
+          changeset = last_revision.changeset
+          changeset.size.should == 1
+          change1 = changeset.first
+          change1.type.to_s.should == "ITEM_IDENTIFIER_ADDED"
+          change1.context.should == topic1
+          last_revision.changeset.first.context.should be_a_kind_of RTM::Topic
+        end
+        it "when adding a sl from a topic" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic1 = @tm.get!("sl:topic1")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          topic1.add_sl("topic_identifier2")
+          topic1.should have(2).references
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "SUBJECT_LOCATOR_ADDED"
+          RTM::Revision.topic_or_association_context(last_revision).should == topic1
+          changeset = last_revision.changeset
+          changeset.size.should == 1
+          change1 = changeset.first
+          change1.type.to_s.should == "SUBJECT_LOCATOR_ADDED"
+          change1.context.should == topic1
+        end
+        it "when removing a topic" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic1 = @tm.get!("topic1")
+          name = topic1.create_name("name")
+          name.create_variant("var", ["theme"])
+          occ = topic1.create_occurrence("occ_type", "occ")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          topic1.remove
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "TOPIC_REMOVED"
+          RTM::Revision.topic_or_association_context(last_revision).should == topic1
+          changeset = last_revision.changeset
+          changeset.size.should == 4
+          change1 = changeset.first
+          ["VARIANT_REMOVED", "OCCURRENCE_REMOVED"].should include change1.type.to_s
+          [name, topic1].should include change1.context
+          change2 = changeset.get(1)
+          ["VARIANT_REMOVED", "OCCURRENCE_REMOVED", "NAME_REMOVED"].should include change2.type.to_s
+          [name, topic1].should include change2.context
+          change3 = changeset.get(2)
+          ["OCCURRENCE_REMOVED", "NAME_REMOVED"].should include change3.type.to_s
+          [topic1].should include change3.context
+          change4 = changeset.last
+          change4.type.to_s.should == "TOPIC_REMOVED"
+          change4.context.should == @tm
+        end
+        it "when removing a name" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic1 = @tm.get!("topic1")
+          name = topic1.create_name("name")
+          name.create_variant("var", ["theme"])
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          name.remove
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "NAME_REMOVED"
+          RTM::Revision.topic_or_association_context(last_revision).should == topic1
+          changeset = last_revision.changeset
+          changeset.size.should == 2
+          change1 = changeset.first
+          ["VARIANT_REMOVED"].should include change1.type.to_s
+          [name].should include change1.context
+          change2 = changeset.last
+          ["NAME_REMOVED"].should include change2.type.to_s
+          [topic1].should include change2.context
+        end
+        it "when removing a variant" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic1 = @tm.get!("topic1")
+          name = topic1.create_name("name")
+          variant = name.create_variant("var", ["theme"])
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          variant.remove
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "VARIANT_REMOVED"
+          RTM::Revision.topic_or_association_context(last_revision).should == topic1
+          changeset = last_revision.changeset
+          changeset.size.should == 1
+          change1 = changeset.first
+          ["VARIANT_REMOVED"].should include change1.type.to_s
+          [name].should include change1.context
+        end
+        it "when removing an occurrence" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic1 = @tm.get!("topic1")
+          occ = topic1.create_occurrence("occ_type", "occ", :scope => ["theme"])
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          occ.remove
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "OCCURRENCE_REMOVED"
+          RTM::Revision.topic_or_association_context(last_revision).should == topic1
+          changeset = last_revision.changeset
+          changeset.size.should == 1
+          change1 = changeset.first
+          ["OCCURRENCE_REMOVED"].should include change1.type.to_s
+          [topic1].should include change1.context
+        end
+        it "when removing an association without roles" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          assoc = @tm.create_association("assoc_type")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          assoc.remove
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "ASSOCIATION_REMOVED"
+          RTM::Revision.topic_or_association_context(last_revision).should == assoc
+          changeset = last_revision.changeset
+          changeset.size.should == 1
+          change1 = changeset.first
+          change1.type.to_s.should == "ASSOCIATION_REMOVED"
+          change1.context.should == @tm
+        end
+        it "when removing an association with roles" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          assoc = @tm.create_association("assoc_type", "role_type1" => "role_player1", "role_type2" => "role_player2")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          assoc.remove
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "ASSOCIATION_REMOVED"
+          RTM::Revision.topic_or_association_context(last_revision).should == assoc
+          changeset = last_revision.changeset
+          changeset.size.should == 3
+          change1 = changeset.first
+          change1.type.to_s.should == "ROLE_REMOVED"
+          change1.context.should == assoc
+          change2 = changeset.get(1)
+          change2.type.to_s.should == "ROLE_REMOVED"
+          change2.context.should == assoc
+          change3 = changeset.last
+          change3.type.to_s.should == "ASSOCIATION_REMOVED"
+          change3.context.should == @tm
+          number_of_roles_removed = changeset.size - 1
+          number_of_roles_removed.times do |i|
+            puts i
+            changeset[i].old_value.player.reference.should include "role_player"
+          end
+        end
+        it "when removing a role from an association" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          assoc = @tm.create_association("assoc_type", "role_type1" => "role_player1")
+          role = assoc.create_role("role_type2", "role_player2")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          role.remove
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "ROLE_REMOVED"
+          RTM::Revision.topic_or_association_context(last_revision).should == assoc
+          changeset = last_revision.changeset
+          changeset.size.should == 1
+          change1 = changeset.first
+          change1.type.to_s.should == "ROLE_REMOVED"
+          change1.context.should == assoc
+        end
+        it "when setting a value of a name" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic1 = @tm.get!("topic1")
+          name = topic1.create_name("name")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          name.set_value("other name")
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "VALUE_MODIFIED"
+          RTM::Revision.topic_or_association_context(last_revision).should == topic1
+          changeset = last_revision.changeset
+          changeset.size.should == 1
+          change1 = changeset.first
+          change1.type.to_s.should == "VALUE_MODIFIED"
+          change1.context.should == name
+        end
+        it "when setting a value of an occurrence" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic1 = @tm.get!("topic1")
+          occ = topic1.create_occurrence("occ_type", "occ")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          occ.set_value(@tm.create_locator("other occ"))
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "VALUE_MODIFIED"
+          RTM::Revision.topic_or_association_context(last_revision).should == topic1
+          changeset = last_revision.changeset
+          changeset.size.should == 2
+          change1 = changeset.first
+          change1.type.to_s.should == "VALUE_MODIFIED"
+          change1.context.should == occ
+          change1 = changeset.last
+          change1.type.to_s.should == "DATATYPE_SET"
+          change1.context.should == occ
+        end
+        it "when setting a value of a variant" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic1 = @tm.get!("topic1")
+          name = topic1.create_name("name")
+          variant = name.create_variant("var", ["theme"])
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          variant.set_value(@tm.create_locator("other val"))
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "VALUE_MODIFIED"
+          RTM::Revision.topic_or_association_context(last_revision).should == topic1
+          changeset = last_revision.changeset
+          changeset.size.should == 2
+          change1 = changeset.first
+          change1.type.to_s.should == "VALUE_MODIFIED"
+          change1.context.should == variant
+          change1 = changeset.last
+          change1.type.to_s.should == "DATATYPE_SET"
+          change1.context.should == variant
+        end
+        it "when adding a theme to a scoped (name)" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic1 = @tm.get!("topic1")
+          name = topic1.create_name("name")
+          @tm.get!("theme")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          name.add_theme("theme")
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "SCOPE_MODIFIED"
+          RTM::Revision.topic_or_association_context(last_revision).should == topic1
+          changeset = last_revision.changeset
+          changeset.size.should == 1
+          change1 = changeset.first
+          change1.type.to_s.should == "SCOPE_MODIFIED"
+          change1.context.should == name
+        end
+        it "when adding a theme to a scoped (association)" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic1 = @tm.get!("topic1")
+          assoc = @tm.create_association("assoc_type", "role_type1" => "role_player1", "role_type2" => "role_player2")
+          @tm.get!("theme")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          assoc.add_theme("theme")
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "SCOPE_MODIFIED"
+          RTM::Revision.topic_or_association_context(last_revision).should == assoc
+          changeset = last_revision.changeset
+          changeset.size.should == 1
+          change1 = changeset.first
+          change1.type.to_s.should == "SCOPE_MODIFIED"
+          change1.context.should == assoc
+        end
+        it "when removing a theme from a scoped (name)" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic1 = @tm.get!("topic1")
+          name = topic1.create_name("name", ["theme"])
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          name.remove_theme("theme")
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "SCOPE_MODIFIED"
+          RTM::Revision.topic_or_association_context(last_revision).should == topic1
+          changeset = last_revision.changeset
+          changeset.size.should == 1
+          change1 = changeset.first
+          change1.type.to_s.should == "SCOPE_MODIFIED"
+          change1.context.should == name
+        end
+        it "when removing a theme to a scoped (association)" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic1 = @tm.get!("topic1")
+          assoc = @tm.create_association("assoc_type", "role_type1" => "role_player1", "role_type2" => "role_player2")
+          assoc.add_theme("theme")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          assoc.remove_theme("theme")
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "SCOPE_MODIFIED"
+          RTM::Revision.topic_or_association_context(last_revision).should == assoc
+          changeset = last_revision.changeset
+          changeset.size.should == 1
+          change1 = changeset.first
+          change1.type.to_s.should == "SCOPE_MODIFIED"
+          change1.context.should == assoc
+        end
+        it "when setting a type of a typed (occurrence)" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic1 = @tm.get!("topic1")
+          occ = topic1.create_occurrence("occ_type", "occ")
+          @tm.get!("other_type")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          occ.type = "other_type"
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "TYPE_SET"
+          RTM::Revision.topic_or_association_context(last_revision).should == topic1
+          changeset = last_revision.changeset
+          changeset.size.should == 1
+          change1 = changeset.first
+          change1.type.to_s.should == "TYPE_SET"
+          change1.context.should == occ
+        end
+        it "when setting a type of a typed (role)" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic1 = @tm.get!("topic1")
+          assoc = @tm.create_association("assoc_type", "role_type1" => "role_player1")
+          role = assoc.create_role("role_type2", "role_player2")
+          @tm.get!("role_type3")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          role.type = "role_type3"
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.last_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "TYPE_SET"
+          RTM::Revision.topic_or_association_context(last_revision).should == assoc
+          changeset = last_revision.changeset
+          changeset.size.should == 1
+          change1 = changeset.first
+          change1.type.to_s.should == "TYPE_SET"
+          change1.context.should == role
+        end
+        it "when setting the player of a role" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic1 = @tm.get!("topic1")
+          assoc = @tm.create_association("assoc_type", "role_type1" => "role_player1")
+          role = assoc.create_role("role_type2", "role_player2")
+          @tm.get!("role_player3")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          role.player = "role_player3"
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.first_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "PLAYER_MODIFIED"
+          RTM::Revision.topic_or_association_context(last_revision).should == assoc
+          changeset = last_revision.changeset
+          changeset.size.should == 1
+          change1 = changeset.first
+          change1.type.to_s.should == "PLAYER_MODIFIED"
+          change1.context.should == role
+        end
+        it "when setting a reifier of a reifier (role)" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic1 = @tm.get!("topic1")
+          assoc = @tm.create_association("assoc_type", "role_type1" => "role_player1")
+          role = assoc.create_role("role_type2", "role_player2")
+          @tm.get!("reifier")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          role.reifier = "reifier"
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.first_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "REIFIER_SET"
+          changeset = last_revision.changeset
+          changeset.size.should == 1
+          change1 = changeset.first
+          change1.type.to_s.should == "REIFIER_SET"
+          change1.context.should == role
+        end
+        it "when de-setting a reifier of a reifier (role) " do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic1 = @tm.get!("topic1")
+          assoc = @tm.create_association("assoc_type", "role_type1" => "role_player1")
+          role = assoc.create_role("role_type2", "role_player2")
+          role.reifier = "reifier"
+          role.reifier.should_not be_nil
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          role.reifier = nil
+          role.reifier.should be_nil
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.first_revision
+          last_revision.should_not be_nil
+          last_revision.changeset_type.to_s.should == "REIFIER_SET"
+          changeset = last_revision.changeset
+          changeset.size.should == 1
+          change1 = changeset.first
+          change1.type.to_s.should == "REIFIER_SET"
+          change1.context.should == role
+        end
+        it "when calling merge_in " do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic1 = @tm.get!("topic1")
+          topic1.create_name("name")
+          topic1.create_occurrence("occ_type", "occ")
+          assoc = @tm.create_association("assoc_type", "role_type1" => "role_player1", "role_type2" => "role_player2")
+          tm = get_used_tm_sys.create("http://example.org/merging_map/")
+          topic2 = tm.get!("topic1")
+          topic2.create_name("name")
+          topic2.create_occurrence("occ_type", "occ")
+          assoc = tm.create_association("assoc_type", "role_type1" => "role_player1", "role_type2" => "role_player2")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          @tm.merge_in(tm)
+          if implementation_for_spec == :majortom_db
+            pending "not working" do
+              @tm.should have(1).all_revisions
+              last_revision = @tm.revision_index.first_revision
+              last_revision.should_not be_nil
+              last_revision.changeset_type.to_s.should == "MERGE"
+              changeset = last_revision.changeset
+              changeset.size.should == 32
+            end
+          else
+            @tm.should have(1).all_revisions
+            last_revision = @tm.revision_index.first_revision
+            last_revision.should_not be_nil
+            last_revision.changeset_type.to_s.should == "MERGE"
+            changeset = last_revision.changeset
+            changeset.size.should == 32
+          end
+        end
+        it "when calling remove_duplicates" do
+          @tm.topics.should be_empty
+          @tm.revision_index.last_revision.should be_nil
+          @tm.disable_revision_management
+          topic1 = @tm.get!("topic1")
+          topic1.create_name("name")
+          topic1.create_name("name")
+          @tm.enable_revision_management
+          @tm.revision_index.last_revision.should be_nil
+          @tm.remove_duplicates
+          @tm.should have(1).all_revisions
+          last_revision = @tm.revision_index.first_revision
+          last_revision.should_not be_nil
+          if implementation_for_spec == :majortom_db
+            pending "not working" do
+              last_revision.changeset_type.to_s.should == "REMOVE_DUPLICATES"
+              changeset = last_revision.changeset
+              changeset.size.should == 1
+            end
+          else
+            last_revision.changeset_type.to_s.should == "REMOVE_DUPLICATES"
+            changeset = last_revision.changeset
+            changeset.size.should == 1
+          end
+        end
+      end
+    end
+
+    describe "Changes in the topic map" do
+      it "should handle creating and deleting a topic" do
+        @tm.topics.should be_empty
+        @tm.revision_index.last_revision.should be_nil
+        @tm.enable_revision_management
+        topic = @tm.get!("topic")
+        topic.remove
+        @tm.should have(2).all_revisions
+        first_revision = @tm.revision_index.first_revision
+        first_revision.changeset_type.should == RTM::Revision::Type::TOPIC_ADDED
+        first_revision.changeset.first.new_value.read_only?.should be_true
+      end
+    end
+
+  end # of describe self
+end