shoes 4.0.0.pre1 → 4.0.0.pre2

data/spec/swt_shoes/border_spec.rb

@@ -1,51 +0,0 @@
-require 'swt_shoes/spec_helper'
-
-describe Shoes::Swt::Border do
-  include_context "swt app"
-
-  let(:left) { 55 }
-  let(:top) { 77 }
-  let(:width) { 222 }
-  let(:height) { 111 }
-  let(:corners) { 0 }
-  let(:dsl) { double("dsl object", element_width: width, element_height: height,
-                     element_left: left, element_top: top, parent: parent,
-                     strokewidth: 1, corners: corners,hidden: false).as_null_object }
-
-  subject { Shoes::Swt::Border.new dsl, swt_app }
-
-  context "#initialize" do
-    it { should be_an_instance_of(Shoes::Swt::Border) }
-    its(:dsl) { should be(dsl) }
-  end
-
-  it_behaves_like "paintable"
-
-  describe "painter" do
-    include_context "painter context"
-
-    let(:corners) { 0 }
-    let(:shape) { Shoes::Swt::Border.new dsl, swt_app }
-    subject { Shoes::Swt::Border::Painter.new shape }
-
-    it_behaves_like "stroke painter"
-
-    describe "square corners" do
-      let(:corners) { 0 }
-
-      specify "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 }
-
-      specify "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
-  end
-end

data/spec/swt_shoes/button_spec.rb

@@ -1,101 +0,0 @@
-require 'swt_shoes/spec_helper'
-
-describe Shoes::Swt::Button do
-  include_context "swt app"
-
-  let(:text) { "TEXT" }
-  let(:dsl) { double('dsl', app: shoes_app, text: text, blk: block, element_width: 100, element_height: 200).as_null_object }
-  let(:block) { proc {} }
-  let(:real) { double('real', disposed?: false).as_null_object }
-
-  subject { Shoes::Swt::Button.new dsl, parent }
-
-  before :each do
-    parent.stub(:real)
-    parent.stub(:dsl){double(contents: [])}
-    dsl.stub(:width=)
-    dsl.stub(:height=)
-    ::Swt::Widgets::Button.stub(:new) { real }
-  end
-
-  it_behaves_like "buttons"
-  it_behaves_like "movable element", 140, 300
-  it_behaves_like "clearable native element"
-  it_behaves_like "togglable"
-
-  describe "#initialize" do
-    it "sets text on real element" do
-      real.should_receive(:set_text).with(text)
-      subject
-    end
-
-    describe 'size' do
-      let(:width) {50}
-      let(:height) {20}
-      let(:size) {double 'real size', x: width, y: height}
-      let(:real) {double('button real', size: size, pack: true).as_null_object}
-
-      before :each do
-        parent.stub(:real)
-        parent.stub(:dsl){double(contents: [])}
-        ::Swt::Widgets::Button.stub(:new) { real }
-      end
-
-      def dsl_for_dimensions(width, height)
-        double('dsl', element_width: width, element_height: height, text: text).as_null_object
-      end
-
-      def with_dimensions_real_should_be(input_width,    input_height,
-                                         expected_width, expected_height)
-        dsl = dsl_for_dimensions input_width, input_height
-        dsl.should_receive(:element_width=).with(expected_width) unless input_width
-        dsl.should_receive(:element_height=).with(expected_height) unless input_height
-        Shoes::Swt::Button.new dsl, parent
-      end
-
-      it 'uses only real when width and height are not specified' do
-        with_dimensions_real_should_be nil, nil, real.size.x, real.size.y
-      end
-
-      it 'uses the real height and specified width if specified' do
-        with_dimensions_real_should_be 110, nil, 110, real.size.y
-      end
-
-      it 'uses the real width and specified height if specified' do
-        with_dimensions_real_should_be nil, 220, real.size.x, 220
-      end
-
-      it 'uses both specified values' do
-        with_dimensions_real_should_be 130, 220, 130, 220
-      end
-
-      it 'sends set_text to the real before packing it #452' do
-        real.should_receive(:set_text).ordered
-        real.should_receive(:pack).ordered
-        subject
-      end
-    end
-  end
-
-  describe 'eval block' do
-    it 'calls the block' do
-      block.should_receive(:call).with(dsl)
-      subject.eval_block block
-    end
-  end
-
-  describe 'click' do
-    it 'adds listener to real object' do
-      expect(real).to receive(:addSelectionListener)
-      subject.click &block
-    end
-
-    it 'passes dsl object to block' do
-      expect(real).to receive(:addSelectionListener).twice do |&blk|
-        expect(block).to receive(:call).with(dsl)
-        blk.call
-      end
-      subject.click &block
-    end
-  end
-end

data/spec/swt_shoes/check_spec.rb

@@ -1,28 +0,0 @@
-require 'swt_shoes/spec_helper'
-
-describe Shoes::Swt::Check do
-  include_context "swt app"
-
-  let(:text) { "TEXT" }
-  let(:dsl) { double('dsl',
-                     :app    => shoes_app, :visible? => true,
-                     :left   => 42, :top => 66,
-                     :element_left => 42, element_top: 66,
-                     :width  => 100, :width= => true,
-                     :element_width => 100, element_height: 200,
-                     :height => 200, :height= => true,
-                     blk:    block, contents: []) }
-  let(:block) { proc {} }
-  let(:real) { double('real').as_null_object }
-
-  subject { Shoes::Swt::Check.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"
-end

data/spec/swt_shoes/color_spec.rb

@@ -1,67 +0,0 @@
-require 'swt_shoes/spec_helper'
-
-describe Shoes::Swt::Color do
-  subject(:color) { Shoes::Swt::Color.create(Shoes::COLORS[:salmon]) }
-
-  it_behaves_like "an swt pattern"
-
-  its(:class) { should eq(Shoes::Swt::Color) }
-
-  describe "underlying SWT object" do
-    let(:real) { color.real }
-
-    it "is a native SWT color" do
-      expect(real.class).to eq(::Swt::Graphics::Color)
-    end
-
-    it "has same red value as Shoes color" do
-      expect(real.red).to eq(250)
-    end
-
-    it "has same green value as Shoes color" do
-      expect(real.green).to eq(128)
-    end
-
-    it "has same blue value as Shoes color" do
-      expect(real.blue).to eq(114)
-    end
-  end
-
-  describe "#apply_as_fill" do
-    let(:gc) { double("gc") }
-
-    it "sets background" do
-      gc.stub(:set_alpha)
-      expect(gc).to receive(:set_background).with(color.real)
-      color.apply_as_fill(gc)
-    end
-
-    it "sets alpha" do
-      gc.stub(:set_background)
-      expect(gc).to receive(:set_alpha)
-      color.apply_as_fill(gc, 10, 20, 100, 200)
-    end
-  end
-end
-
-describe Shoes::Swt::NullColor do
-  subject(:color) { Shoes::Swt::Color.create(nil) }
-
-  it { should be_instance_of(Shoes::Swt::NullColor) }
-  its(:real) { should be_nil }
-  its(:dsl) { should be_nil }
-  its(:alpha) { should be_nil }
-
-  describe "pattern interface" do
-    let(:gc) { double("graphics context") }
-
-    it "sends no messages in #apply_as_fill" do
-      color.apply_as_fill(gc)
-    end
-
-    it "sends no messages in #apply_as_stroke" do
-      color.apply_as_stroke(gc)
-    end
-  end
-end
-

data/spec/swt_shoes/common/painter_spec.rb

@@ -1,29 +0,0 @@
-require 'swt_shoes/spec_helper'
-
-describe Shoes::Swt::Common::Painter do
-  let(:object) {double 'object', dsl: dsl}
-  let(:dsl) {double 'dsl', visible?: true, positioned?: true}
-  let(:event) {double 'paint event', gc: graphics_context}
-  let(:graphics_context) {double 'graphics_context'}
-  subject {Shoes::Swt::Common::Painter.new object}
-
-  describe '#paint_control' do
-    it 'should attempts to paint the object' do
-      expect(subject).to receive(:paint_object)
-      subject.paint_control event
-    end
-
-    it 'does paint the object if it is hidden' do
-      dsl.stub visible?: false
-      expect(subject).not_to receive(:paint_object)
-      subject.paint_control event
-    end
-
-    it 'does not paint the object if it is not positioned' do
-      dsl.stub positioned?: false
-      expect(subject).not_to receive(:paint_object)
-      subject.paint_control event
-    end
-  end
-
-end

data/spec/swt_shoes/configuration_spec.rb

@@ -1,12 +0,0 @@
-require 'swt_shoes/spec_helper'
-
-describe Shoes::Configuration do
-  context ":swt" do
-    describe "#backend" do
-      it "sets backend" do
-        Shoes.configuration.backend.should == Shoes::Swt
-      end
-    end
-
-  end
-end

data/spec/swt_shoes/dialog_spec.rb

@@ -1,106 +0,0 @@
-require 'swt_shoes/spec_helper'
-
-main_object = self
-
-describe Shoes::Swt::Dialog do
-
-  def double_message_box
-    create_double_message_box double(:mb, open: true, :message= => true)
-  end
-
-  def double_message_box_expecting_message(message)
-    double_dialog = double(:mb, open: true)
-    double_dialog.should_receive(:message=).with(message)
-    create_double_message_box double_dialog
-  end
-
-  def double_message_box_returning(return_value)
-    create_double_message_box double(:mb, :message= => true, open: return_value)
-  end
-
-  def create_double_message_box(double_dialog)
-    ::Swt::Widgets::Shell.stub(:new)
-    ::Swt::Widgets::MessageBox.stub(new: double_dialog)
-  end
-
-  before :each do
-    @dialog = Shoes::Swt::Dialog.new
-  end
-
-  TEXT = 'some random text'
-
-  describe 'alert' do
-    it 'pops up a window containing a short message.' do
-      double_message_box_expecting_message TEXT
-      @dialog.alert TEXT
-    end
-
-    it 'returns nil' do
-      double_message_box
-      @dialog.alert('Nothing').should be_nil
-    end
-  end
-
-  describe 'confirm' do
-    it 'pops up a window containing a short message.' do
-      double_message_box_expecting_message TEXT
-      @dialog.confirm TEXT
-    end
-
-    it 'is true when YES was pressed' do
-      double_message_box_returning ::Swt::SWT::YES
-      subject.confirm.should be_true
-    end
-
-    it 'is false when NO was pressed' do
-      double_message_box_returning ::Swt::SWT::NO
-      subject.confirm.should be_false
-    end
-
-    it 'is false when an arbitary number is returned' do
-      double_message_box_returning 42
-      subject.confirm.should be_false
-    end
-  end
-
-  describe 'dialog_chooser' do
-    it 'responds to it' do
-      @dialog.should respond_to :dialog_chooser
-    end
-  end
-
-  describe 'ask' do
-    it 'responds to it' do
-      @dialog.should respond_to :ask
-    end
-  end
-
-  describe 'ask_color' do
-    it 'responds to it' do
-      @dialog.should respond_to :ask_color
-    end
-  end
-
-  describe 'on the main object' do
-    describe '#alert' do
-
-      it 'returns nil' do
-        double_message_box
-        main_object.alert('Something').should be_nil
-      end
-    end
-
-    describe '#confirm' do
-      it 'returns true when YES was clicked' do
-        double_message_box_returning ::Swt::SWT::YES
-        main_object.confirm('1 + 1 = 2').should be_true
-      end
-
-      it 'returns false when NO was clicked' do
-        double_message_box_returning ::Swt::SWT::NO
-        main_object.confirm('1 + 1 = 3').should be_false
-      end
-    end
-  end
-
-end

data/spec/swt_shoes/disposed_protection_spec.rb

@@ -1,49 +0,0 @@
-class Harness
-  include Shoes::Swt::DisposedProtection
-
-  def initialize(real)
-    @real = real
-  end
-end
-
-describe Shoes::Swt::DisposedProtection do
-  let(:width) { 234 }
-  let(:real_with_disposed_protection) { Harness.new(bare_real).real }
-
-  context "when real object is NOT disposed" do
-    let(:bare_real) { double("delegation object", width: width, dispose: nil, disposed?: false) }
-
-    it "delegates method" do
-      real_with_disposed_protection.width
-      expect(bare_real).to have_received(:width)
-    end
-
-    it "returns the same result as the bare real object" do
-      expect(real_with_disposed_protection.width).to eq(width)
-    end
-
-    it "disposes real object" do
-      real_with_disposed_protection.dispose
-      expect(bare_real).to have_received(:dispose)
-    end
-  end
-
-  context "when real object IS disposed" do
-    let(:bare_real) { double("delegation object", width: width, dispose: nil, disposed?: true) }
-
-    it "does NOT delegate method" do
-      real_with_disposed_protection.width
-      expect(bare_real).not_to have_received(:width)
-    end
-
-    it "returns nil" do
-      expect(real_with_disposed_protection.width).to eq(nil)
-    end
-
-    it "does NOT dispose real object" do
-      real_with_disposed_protection.dispose
-      expect(bare_real).not_to have_received(:dispose)
-    end
-  end
-end
-