shoes 4.0.0.pre1 → 4.0.0.pre2

data/spec/swt_shoes/radio_spec.rb

@@ -1,56 +0,0 @@
-require 'swt_shoes/spec_helper'
-
-describe Shoes::Swt::Radio do
-  include_context "swt app"
-
-  let(:text) { "TEXT" }
-  let(:dsl) { double('dsl', :app => shoes_app,
-                     :width= => true, :width => 100,
-                     :height= => true, :height => 200,
-                     :group => nil, :blk => block).as_null_object }
-  let(:block) { proc {} }
-  let(:real) { double('real').as_null_object }
-
-  subject { Shoes::Swt::Radio.new dsl, parent }
-
-  before :each do
-    ::Swt::Widgets::Button.stub(:new) { real }
-  end
-
-  it_behaves_like "buttons"
-  it_behaves_like "movable element"
-  it_behaves_like "selectable"
-  it_behaves_like "togglable"
-
-  describe "#initialize" do
-    it "sets group to default" do
-      subject.group.should == Shoes::Swt::RadioGroup::DEFAULT_RADIO_GROUP
-    end
-  end
-
-  describe "#group=" do
-    let(:group_name) { "New Group Name" }
-    let(:radio_group) { double("radio_group").as_null_object }
-    let(:group_lookup) { double('group_lookup', :[] => radio_group).as_null_object }
-    before :each do
-      Shoes::Swt::RadioGroup.stub(:group_lookup) { group_lookup }  
-    end
-
-    it "changes the group" do
-      subject.group = group_name
-      subject.group.should == group_name
-    end
-
-    it "adds to the new radio group" do
-      group_lookup.should_receive(:[]).with group_name
-      radio_group.should_receive(:add).with subject
-      subject.group = group_name
-    end
-
-    it "removes from the old radio group" do
-      group_lookup.should_receive(:[]).with Shoes::Swt::RadioGroup::DEFAULT_RADIO_GROUP
-      radio_group.should_receive(:remove).with subject
-      subject.group = group_name
-    end
-  end
-end

data/spec/swt_shoes/rect_painter_spec.rb

@@ -1,45 +0,0 @@
-require 'swt_shoes/spec_helper'
-
-describe Shoes::Swt::RectPainter do
-  include_context "painter context"
-
-  let(:corners) { 0 }
-  let(:app) { double('app', :real => container, :add_paint_listener => true, :dsl => dsl) }
-  let(:container) { double('container', :disposed? => false) }
-  let(:dsl) { double("dsl object", hidden: false, rotate: 0,
-                     element_left: left, element_top: top,
-                     element_width: width, element_height: height,
-                     corners: corners).as_null_object }
-  let(:left) { 55 }
-  let(:top) { 77 }
-  let(:width) { 222 }
-  let(:height) { 111 }
-  let(:shape) { Shoes::Swt::Rect.new dsl, app, :curve => corners }
-  subject { Shoes::Swt::RectPainter.new shape }
-
-  it_behaves_like "fill painter"
-  it_behaves_like "stroke painter"
-
-  describe "square corners" do
-    let(:corners) { 0 }
-
-    it "fills rect" do
-      gc.should_receive(:fill_round_rectangle).with(left, top, width, height, corners*2, corners*2)
-      subject.paint_control(event)
-    end
-
-    it "draws rect" do
-      gc.should_receive(:draw_round_rectangle).with(left+sw/2, top+sw/2, width-sw, height-sw, corners*2, corners*2)
-      subject.paint_control(event)
-    end
-  end
-
-  describe "round corners" do
-    let(:corners) { 13 }
-
-    it "draws rect with rounded corners" do
-      gc.should_receive(:draw_round_rectangle).with(left+sw/2, top+sw/2, width-sw, height-sw, corners*2, corners*2)
-      subject.paint_control(event)
-    end
-  end
-end

data/spec/swt_shoes/rect_spec.rb

@@ -1,19 +0,0 @@
-require 'swt_shoes/spec_helper'
-
-describe Shoes::Swt::Rect do
-  include_context "swt app"
-
-  let(:left) { 55 }
-  let(:top) { 77 }
-  let(:width) { 222 }
-  let(:height) { 111 }
-  let(:dsl) {::Shoes::Rect.new shoes_app, parent, left, top, width, height}
-
-  subject {
-    Shoes::Swt::Rect.new dsl, swt_app
-  }
-
-  it_behaves_like "paintable"
-  it_behaves_like "togglable"
-  it_behaves_like 'clickable backend'
-end

data/spec/swt_shoes/shape_spec.rb

@@ -1,81 +0,0 @@
-require 'swt_shoes/spec_helper'
-
-describe Shoes::Swt::Shape do
-  include_context "swt app"
-
-  let(:dsl) { double('dsl', hidden: false).as_null_object }
-  subject { Shoes::Swt::Shape.new dsl, swt_app }
-
-  shared_examples_for "Swt::Shape" do
-    let(:ancestors) { subject.class.ancestors.map(&:name) }
-
-    it "uses Shoes::Swt" do
-      ancestors.should include('Shoes::Swt::Shape')
-      subject
-    end
-
-    its(:dsl) { should be(dsl) }
-  end
-
-  it_behaves_like "Swt::Shape"
-  it_behaves_like "paintable"
-
-  describe "Swt element" do
-    let(:element) { double("element") }
-
-    before :each do
-      ::Swt::Path.stub(:new) { element }
-    end
-
-    it "delegates #move_to" do
-      element.should_receive(:move_to).with(20, 30)
-      subject.move_to 20, 30
-    end
-
-    it "delegates #line_to" do
-      element.should_receive(:line_to).with(20, 30)
-      subject.line_to 20, 30
-    end
-
-    it "delegates #quad_to" do
-      element.should_receive(:quad_to).with(100, 100, 20, 200)
-      subject.quad_to 100, 100, 20, 200
-    end
-  end
-
-  describe "moving" do
-    let(:transform) { double("transform") }
-
-    before :each do
-      ::Swt::Transform.stub(:new) { transform }
-    end
-
-    it "delegates #move" do
-      dsl.stub element_left: 20, element_top: 30
-      transform.should_receive(:translate).with(20, 30)
-      subject.update_position
-    end
-
-  end
-
-  describe "painter" do
-    include_context "painter context"
-
-    let(:shape) { Shoes::Swt::Shape.new(dsl, swt_app) }
-    subject { Shoes::Swt::Shape::Painter.new(shape) }
-
-    it_behaves_like "stroke painter"
-    it_behaves_like "fill painter"
-    it_behaves_like "movable painter"
-
-    it "fills path" do
-      gc.should_receive(:fill_path)
-      subject.paint_control(event)
-    end
-
-    it "draws path" do
-      gc.should_receive(:draw_path)
-      subject.paint_control(event)
-    end
-  end
-end

data/spec/swt_shoes/shared_examples/button.rb

@@ -1,24 +0,0 @@
-shared_examples "buttons" do
-  it "calls set_focus when focus is called" do
-    real.should_receive :set_focus
-    subject.focus
-  end
-
-  it "passes block to real element" do
-    real.should_receive(:addSelectionListener).with(&block)
-    subject
-  end
-end
-
-# Check and Radio
-shared_examples "selectable" do
-  it "calls get_selection when checked? is called" do
-    real.should_receive :get_selection
-    subject.checked?
-  end
-
-  it "calls set_selection when checked= is called" do
-    real.should_receive(:set_selection).with(true)
-    subject.checked = true
-  end
-end

data/spec/swt_shoes/shared_examples/clearable.rb

@@ -1,32 +0,0 @@
-shared_examples_for "clearable" do
-  it "should respond to clear" do
-    subject.should respond_to :clear
-  end
-
-  it "should remove paint listener" do
-    swt_app.should_receive(:remove_paint_listener)
-    swt_app.should_receive(:remove_listener).at_least(2).times
-    subject.clear
-  end
-end
-
-shared_examples_for "clearable native element" do
-  it "should respond to clear" do
-    subject.should respond_to :clear
-  end
-
-  it "should dispose real when real is not disposed" do
-    swt_app.stub(:remove_listener)
-    real.stub(:disposed?) { false }
-    real.should_receive(:dispose)
-    subject.clear
-  end
-
-  it "should not dispose real when real is already disposed" do
-    swt_app.stub(:remove_listener)
-    real.stub(:disposed?) { true }
-    real.should_not_receive(:dispose)
-    subject.clear
-  end
-end
-

data/spec/swt_shoes/shared_examples/clickable.rb

@@ -1,60 +0,0 @@
-shared_examples 'clickable backend' do
-
-  before :each do
-    swt_app.stub :add_clickable_element
-    dsl.stub(:in_bounds?) { true }
-  end
-
-  let(:clickable_block) {double 'clickable_block'}
-  let(:clickable_subject) do
-    subject.clickable clickable_block
-    subject
-  end
-
-  let(:mouse_event) {double 'mouse_event', button: 1, x: 2, y:3}
-
-  it {should respond_to :clickable}
- 
-  it 'its click_handler should not be nil' do
-    clickable_subject.click_listener.should_not be_nil
-  end
-
-  it 'calls the block when a click event comes in bounds' do
-    clickable_block.should_receive(:call).with(1, 2, 3)
-    clickable_subject.click_listener.handleEvent mouse_event
-  end
-
-  describe 'interaction with the swt app object' do
-
-    def expect_adds_listener_for(event)
-      swt_app.should_receive(:add_listener).with(event, clickable_subject.click_listener)
-    end
-
-    it 'receives the add_clickable_element message' do
-      swt_app.should_receive(:add_clickable_element)
-      clickable_subject
-    end
-
-    it 'adds a listener for the MouseDown event' do
-      expect_adds_listener_for ::Swt::SWT::MouseDown
-      clickable_subject
-    end
-
-    it 'adds a listener for the MouseDown event when click is called' do
-      expect_adds_listener_for ::Swt::SWT::MouseDown
-      subject.click do ; end
-    end
-
-    it 'adds a listener for the MouseUp event when release is called' do
-      expect_adds_listener_for ::Swt::SWT::MouseUp
-      subject.release do ; end
-    end
-  end
-
-  it 'only hands the dsl object to the app' do
-    subject.click do ; end
-    # at least is used for link - because it already triggers it in intialize
-    expect(swt_app).to have_received(:add_clickable_element).with(subject.dsl).
-                           at_least(1).times
-  end
-end

data/spec/swt_shoes/shared_examples/movable.rb

@@ -1,36 +0,0 @@
-shared_examples "movable element" do |left, top|
-
-  before :each do
-    dsl.stub element_left: left, element_top: top
-  end
-
-  context "with disposed real element" do
-    before :each do
-      real.stub(:disposed?) { true }
-    end
-
-    it "doesn't delegate to real" do
-      real.should_not_receive(:set_location)
-      subject.update_position
-    end
-  end
-
-  context "with undisposed real element" do
-    before :each do
-      real.stub(:disposed?) { false }
-    end
-
-    it "delegates to real" do
-      real.should_receive(:set_location).with(left, top)
-      subject.update_position
-    end
-  end
-end
-
-shared_examples_for "movable shape" do |x, y|
-  it "redraws container" do
-    container.should_receive(:redraw).at_least(2).times
-    dsl.stub element_left: x, element_top: y
-    subject.update_position
-  end
-end

data/spec/swt_shoes/shared_examples/paintable_spec.rb

@@ -1,7 +0,0 @@
-shared_examples_for "paintable" do
-  it "registers for painting" do
-    swt_app.should_receive(:add_paint_listener)
-    subject
-  end
-end
-

data/spec/swt_shoes/shared_examples/painter.rb

@@ -1,83 +0,0 @@
-# Provide `shape` (a double) and `subject` (a Painter)
-
-shared_context "painter context" do
-  let(:event) { double("event", :gc => gc) }
-  let(:gc) { double("gc", :get_line_width => sw).as_null_object }
-  let(:fill) { Shoes::Swt::Color.new(Shoes::Color.new(11, 12, 13, fill_alpha)) }
-  let(:stroke) { Shoes::Swt::Color.new(Shoes::Color.new(111, 112, 113, stroke_alpha)) }
-  let(:fill_alpha) { 70 }
-  let(:stroke_alpha) { 110 }
-  let(:sw) { 10 }
-
-  before :each do
-    shape.stub(:fill) { fill }
-    shape.stub(:fill_alpha) { fill_alpha }
-    shape.stub(:stroke) { stroke }
-    shape.stub(:stroke_alpha) { stroke_alpha }
-    subject.stub(:reset_rotate) { double("reset_rotate").as_null_object }
-  end
-end
-
-
-shared_examples_for "movable painter" do
-  describe "when moved" do
-    let(:transform) { double("transform").as_null_object }
-
-    before :each do
-      ::Swt::Transform.stub(:new) { transform }
-      shape.update_position
-    end
-
-    it "applies transform" do
-      gc.should_receive(:set_transform).with(transform)
-      subject.paint_control(event)
-    end
-  end
-end
-
-shared_examples_for "stroke painter" do
-  describe "sets stroke" do
-    specify "color" do
-      gc.should_receive(:set_foreground).with(stroke.real)
-      subject.paint_control(event)
-    end
-
-    specify "alpha" do
-      gc.stub(:set_alpha)
-      gc.should_receive(:set_alpha).with(stroke_alpha)
-      subject.paint_control(event)
-    end
-  end
-
-  it "sets strokewidth" do
-    shape.stub(:strokewidth) { 4 }
-    gc.should_receive(:set_line_width).with(4)
-    subject.paint_control(event)
-  end
-
-  it "sets antialias" do
-    gc.should_receive(:set_antialias).with(Swt::SWT::ON)
-    subject.paint_control(event)
-  end
-  
-  it "sets line cap" do
-    gc.should_receive(:set_line_cap).with(anything)
-    subject.paint_control(event)
-  end
-end
-
-shared_examples_for "fill painter" do
-  describe "sets fill" do
-    specify "color" do
-      gc.should_receive(:set_background).with(fill.real)
-      subject.paint_control(event)
-    end
-
-    specify "alpha" do
-      # Once for stroke, once for fill
-      gc.stub(:set_alpha)
-      gc.should_receive(:set_alpha).with(fill_alpha)
-      subject.paint_control(event)
-    end
-  end
-end