Split off also tests.

library/cwm/src/lib/cwm/abstract_widget.rb

@@ -1,3 +1,5 @@
+require "abstract_method"
+
 module CWM
   # Represent base for any widget used in CWM. It can be passed as "widget"
   # argument. For more details about usage

library/cwm/src/lib/cwm/custom_widget.rb

@@ -1,3 +1,6 @@
+require "abstract_method"
+require "cwm/abstract_widget"
+
 module CWM
   # A custom widget that has its UI content defined in the method {#contents}.
   # Useful mainly when a specialized widget including more subwidgets should be

library/cwm/test/Makefile.am

@@ -1,4 +1,6 @@
 TESTS = \
+	abstract_widget_test.rb \
+	custom_widget_test.rb \
 	widgets_test.rb
 
 TEST_EXTENSIONS = .rb

library/cwm/test/abstract_widget_test.rb

@@ -0,0 +1,190 @@
+#! /usr/bin/env rspec
+
+require_relative "test_helper"
+
+require "cwm/abstract_widget"
+
+describe CWM::AbstractWidget do
+  describe "#widget_id" do
+    class T1 < CWM::AbstractWidget
+      def initialize(id: nil)
+        self.widget_id = id
+      end
+    end
+
+    it "returns string specified by #widget_id=" do
+      widget = T1.new(id: "test")
+      expect(widget.widget_id).to eq "test"
+    end
+
+    it "returns class as string if not specified by #widget_id=" do
+      widget = T1.new
+      expect(widget.widget_id).to eq "T1"
+    end
+  end
+
+  describe "#widget_type" do
+    class T2 < CWM::AbstractWidget
+      self.widget_type = :empty
+    end
+
+    it "return symbol of widget type specified by .widget_type=" do
+      expect(T2.new.widget_type).to eq :empty
+    end
+  end
+
+  describe "#handle_all_events" do
+    class T3 < CWM::AbstractWidget
+      def initialize(all: nil)
+        self.handle_all_events = all
+      end
+    end
+
+    it "returns boolean specified by #handle_all_events=" do
+      widget = T3.new(all: true)
+      expect(widget.handle_all_events).to eq true
+    end
+
+    it "returns false if not specified by #handle_all_events=" do
+      widget = T3.new
+      expect(widget.handle_all_events).to eq false
+    end
+  end
+
+  describe "#description" do
+
+    class TNoWidgetType < CWM::AbstractWidget; end
+
+    it "raises exception if widget type in child is not specified" do
+      expect { TNoWidgetType.new.cwm_definition }.to raise_error(RuntimeError)
+    end
+
+    class THelp < CWM::AbstractWidget
+      self.widget_type = :empty
+      def help
+        "helpful string"
+      end
+    end
+
+    it "returns hash with \"help\" key and #help result as value" do
+      expect(THelp.new.cwm_definition["help"]).to eq "helpful string"
+    end
+
+    class TNoHelp < CWM::AbstractWidget
+      self.widget_type = :empty
+    end
+
+    it "returns hash with \"no_help\" key if no help method specified" do
+      expect(TNoHelp.new.cwm_definition).to be_key("no_help")
+    end
+
+    class TLabel < CWM::AbstractWidget
+      self.widget_type = :empty
+      def label
+        "helpful string"
+      end
+    end
+
+    it "returns hash with \"label\" key and #label result as value" do
+      expect(TLabel.new.cwm_definition["label"]).to eq "helpful string"
+    end
+
+    class TOpt < CWM::AbstractWidget
+      self.widget_type = :empty
+      def opt
+        [:notify]
+      end
+    end
+
+    it "returns hash with \"opt\" key and #opt result as value" do
+      expect(TOpt.new.cwm_definition["opt"]).to eq [:notify]
+    end
+
+    class TWidget < CWM::AbstractWidget
+      self.widget_type = :empty
+    end
+
+    it "returns hash with \"widget\" key and #widget_type result as value" do
+      expect(TWidget.new.cwm_definition["widget"]).to eq :empty
+    end
+
+    context "handle_all_events set to false" do
+      class THandleEvents < CWM::AbstractWidget
+        self.widget_type = :empty
+
+        def initialize
+          self.widget_id = "test"
+          self.handle_all_events = false
+        end
+      end
+
+      it "returns hash with \"handle_events\" key and array with #widget_id result as value" do
+        expect(THandleEvents.new.cwm_definition["handle_events"]).to eq ["test"]
+      end
+    end
+
+    context "handle_all_events set to true" do
+      class TNotHandleEvents < CWM::AbstractWidget
+        self.widget_type = :empty
+
+        def initialize
+          self.handle_all_events = true
+        end
+      end
+
+      it "returns hash without \"handle_events\" key" do
+        expect(TNotHandleEvents.new.cwm_definition).to_not be_key("handle_events")
+      end
+    end
+
+    class TInit < CWM::AbstractWidget
+      self.widget_type = :empty
+      def init
+      end
+    end
+
+    it "returns hash with key init when init method defined" do
+      expect(TInit.new.cwm_definition).to be_key("init")
+    end
+
+    class THandle1 < CWM::AbstractWidget
+      self.widget_type = :empty
+      def handle
+      end
+    end
+
+    it "returns hash with key handle when handle without parameter defined" do
+      expect(THandle1.new.cwm_definition).to be_key("handle")
+    end
+
+    class THandle2 < CWM::AbstractWidget
+      self.widget_type = :empty
+      def handle(_event)
+      end
+    end
+
+    it "returns hash with key handle when handle with parameter defined" do
+      expect(THandle2.new.cwm_definition).to be_key("handle")
+    end
+
+    class TStore < CWM::AbstractWidget
+      self.widget_type = :empty
+      def store
+      end
+    end
+
+    it "returns hash with key store when store method defined" do
+      expect(TStore.new.cwm_definition).to be_key("store")
+    end
+
+    class TCleanup < CWM::AbstractWidget
+      self.widget_type = :empty
+      def cleanup
+      end
+    end
+
+    it "returns hash with key cleanup when cleanup method defined" do
+      expect(TCleanup.new.cwm_definition).to be_key("cleanup")
+    end
+  end
+end

library/cwm/test/custom_widget_test.rb

@@ -0,0 +1,28 @@
+require_relative "test_helper"
+
+require "cwm/custom_widget"
+
+describe CWM::CustomWidget do
+  describe "#description" do
+    context "handle_all_events is false" do
+      class CustomTestWidget < CWM::CustomWidget
+        def initialize
+          self.handle_all_events = false
+          self.widget_id = "test_widget"
+        end
+
+        def contents
+          HBox(
+            InputField(Id(:first), "test"),
+            PushButton(Id("second"), "Discover 42")
+          )
+        end
+      end
+      subject { CustomTestWidget.new }
+
+      it "adds to description to handle only ids in contents and widget_id" do
+        expect(subject.cwm_definition["handle_events"]).to eq [:first, "second", "test_widget"]
+      end
+    end
+  end
+end