shoes-core 4.0.0.pre7 → 4.0.0.pre8

data/spec/shoes/shared_examples/clickable.rb

@@ -1,5 +0,0 @@
-shared_examples "clickable object" do
-  it { is_expected.to respond_to :click }
-  it { is_expected.to respond_to :release }
-  it { is_expected.to respond_to :register_click }
-end

data/spec/shoes/shared_examples/common_methods.rb

@@ -1,35 +0,0 @@
-shared_examples_for "movable object" do
-  it "moves" do
-    subject.instance_variable_set(:@app, app)
-    expect(subject.move(300, 200)).to eq(subject)
-    expect(subject.left).to eq(300)
-    expect(subject.top).to eq(200)
-  end
-
-  describe "displacing" do
-    it "displaces backend object" do
-      expect(subject.gui).to receive(:update_position)
-      subject.displace(300, 200)
-    end
-
-    it "does not change reported values of #left and #top" do
-      # no error from calling set location with nil values due to unset values
-      allow(subject.gui).to receive :update_position
-      original_left = subject.left
-      original_top = subject.top
-      subject.displace(300, 200)
-      expect(subject.left).to eq(original_left)
-      expect(subject.top).to eq(original_top)
-    end
-  end
-end
-
-shared_examples_for "left, top as center" do |*params|
-  let(:centered_object) { described_class.new(app, parent, left, top, width, height, *params, center: true) }
-  it "should now be located somewhere" do
-    expect(centered_object.left).to eq(left - (width / 2))
-    expect(centered_object.top).to eq(top - (height / 2))
-    expect(centered_object.width).to eq(width)
-    expect(centered_object.height).to eq(height)
-  end
-end

data/spec/shoes/shared_examples/dimensions.rb

@@ -1,32 +0,0 @@
-shared_examples_for "object with dimensions" do
-  it "should initialize" do
-    expect(subject.left).to eq(left)
-    expect(subject.top).to eq(top)
-    expect(subject.width).to eq(width)
-    expect(subject.height).to eq(height)
-  end
-end
-
-shared_examples_for "object with relative dimensions" do
-  let(:relative_width) { 0.5 }
-  let(:relative_height) { 0.5 }
-  let(:relative_opts) { {left: left, top: top, width: relative_width, height: relative_height} }
-
-  it "should initialize based on parent dimensions" do
-    expect(subject.left).to eq left
-    expect(subject.top).to eq top
-    expect(subject.width).to be_within(1).of(parent.element_width / 2)
-    expect(subject.height).to be_within(1).of(parent.element_height / 2)
-  end
-end
-
-shared_examples_for "object with negative dimensions" do
-  let(:negative_opts) { {left: left, top: top, width: -width, height: -height} }
-
-  it "should initialize based on parent dimensions" do
-    expect(subject.left).to eq(left)
-    expect(subject.top).to eq(top)
-    expect(subject.width).to eq(parent.element_width - width)
-    expect(subject.height).to eq(parent.element_height - height)
-  end
-end

data/spec/shoes/shared_examples/dsl.rb

@@ -1,44 +0,0 @@
-# Shared examples for Shoes::App and Shoes::Slot (flow and stack).
-# If DSL methods can be called with multiple number of arguments,
-# and if they set certain defaults, then that what needs to be tested
-# here.
-# There are individual specs for the different Shoes elements, so
-# we don't need to test how they work in details. Here we just test that
-# the DSL methods construct elements correctly.
-shared_examples "DSL container" do
-  let(:dsl) { app }
-
-  %w(
-    animate
-    arc
-    background
-    button
-    border
-    cap
-    check
-    edit_box
-    edit_line
-    fill
-    flow
-    gradient
-    image
-    line
-    nofill
-    nostroke
-    oval
-    pattern
-    progress
-    rect
-    rgb
-    shape
-    star
-    stroke
-    strokewidth
-    style
-    video
-  ).each do |method|
-    include_examples "#{method} DSL method"
-  end
-
-  include_examples "text element DSL methods"
-end

data/spec/shoes/shared_examples/dsl/animate.rb

@@ -1,29 +0,0 @@
-shared_examples_for "animate DSL method" do
-  context "defaults" do
-    let(:animation) { dsl.animate {} }
-
-    it "is a Shoes::Animation" do
-      expect(animation).to be_an_instance_of(Shoes::Animation)
-    end
-
-    it "framerate is 10" do
-      expect(animation.framerate).to eq 10
-    end
-  end
-
-  context "with numeric argument" do
-    let(:animation) { dsl.animate(13) {} }
-
-    it "sets framerate" do
-      expect(animation.framerate).to eq(13)
-    end
-  end
-
-  context "with hash argument" do
-    let(:animation) { dsl.animate(framerate: 17) {} }
-
-    it "sets framerate" do
-      expect(animation.framerate).to eq(17)
-    end
-  end
-end

data/spec/shoes/shared_examples/dsl/arc.rb

@@ -1,45 +0,0 @@
-shared_context "style context" do
-  let(:fill_color) { Shoes::COLORS.fetch(:tomato) }
-  let(:stroke_color) { Shoes::COLORS.fetch(:chartreuse) }
-
-  before :each do
-    subject.fill fill_color
-    subject.stroke stroke_color
-  end
-end
-
-shared_examples_for "persistent stroke" do
-  include_context "style context"
-
-  it "passes to element" do
-    expect(element.stroke).to eq(stroke_color)
-  end
-end
-
-shared_examples_for "persistent fill" do
-  include_context "style context"
-
-  it "passes to element" do
-    expect(element.fill).to eq(fill_color)
-  end
-end
-
-shared_examples_for "arc DSL method" do
-  let(:arc) { dsl.arc(13, 44, 200, 300, 0, Shoes::TWO_PI) }
-
-  it "creates a Shoes::Arc" do
-    expect(arc).to be_an_instance_of(Shoes::Arc)
-  end
-
-  it "raises an ArgumentError" do
-    expect { dsl.arc(30) }.to raise_exception(ArgumentError)
-  end
-
-  it_behaves_like "persistent fill" do
-    let(:element) { arc }
-  end
-
-  it_behaves_like "persistent stroke" do
-    let(:element) { arc }
-  end
-end

data/spec/shoes/shared_examples/dsl/background.rb

@@ -1,26 +0,0 @@
-shared_examples_for "background DSL method" do
-  context "with a valid hex string" do
-    it "sets color" do
-      background = subject.background("#fff")
-      expect(background.fill).to eq(Shoes::COLORS[:white])
-    end
-  end
-
-  context "with an invalid hex string" do
-    it 'raises an argument error' do
-      expect { subject.background('#ffq') }.to raise_error('Bad hex color: #ffq')
-    end
-  end
-
-  context 'with no valid image' do
-    it 'ignores the background' do
-      expect { subject.background('fake-shoes.jpg') }.not_to raise_error
-    end
-  end
-
-  context 'with a valid image' do
-    it 'creates a Shoes::Background' do
-      expect(subject.background('static/shoes-icon.png')).to be_an_instance_of(Shoes::Background)
-    end
-  end
-end

data/spec/shoes/shared_examples/dsl/border.rb

@@ -1,10 +0,0 @@
-shared_examples_for "border DSL method" do
-  context "with hex string" do
-    let(:color) { "#ffffff" }
-
-    it "sets color" do
-      border = dsl.border(color)
-      expect(border.stroke).to eq(Shoes::COLORS[:white])
-    end
-  end
-end

data/spec/shoes/shared_examples/dsl/button.rb

@@ -1,5 +0,0 @@
-shared_examples_for "button DSL method" do
-  it "is created with a default text" do
-    expect(dsl.button.text).to eq 'Button'
-  end
-end

data/spec/shoes/shared_examples/dsl/cap.rb

@@ -1,6 +0,0 @@
-shared_examples_for "cap DSL method" do
-  it "sets the line cap" do
-    dsl.cap :curve
-    expect(dsl.style[:cap]).to eq(:curve)
-  end
-end

data/spec/shoes/shared_examples/dsl/check.rb

@@ -1,11 +0,0 @@
-shared_examples_for 'check DSL method' do
-  let(:checkbox) { dsl.check }
-
-  it 'should be a checkbox' do
-    expect(checkbox).to be_instance_of Shoes::Check
-  end
-
-  it 'should be unchecked by default' do
-    expect(checkbox.checked?).to be_falsey
-  end
-end

data/spec/shoes/shared_examples/dsl/edit_box.rb

@@ -1,8 +0,0 @@
-shared_examples_for "edit_box DSL method" do
-  context "edit_box" do
-    include_examples "editable element" do
-      let(:dsl_method) { :edit_box }
-      let(:klazz) { Shoes::EditBox }
-    end
-  end
-end

data/spec/shoes/shared_examples/dsl/edit_line.rb

@@ -1,8 +0,0 @@
-shared_examples_for "edit_line DSL method" do
-  context "edit_line" do
-    include_examples "editable element"
-
-    let(:dsl_method) { :edit_line }
-    let(:klazz) { Shoes::EditLine }
-  end
-end

data/spec/shoes/shared_examples/dsl/editable_element.rb

@@ -1,29 +0,0 @@
-shared_examples_for "editable element" do
-  subject { super.public_send(dsl_method, *args) }
-
-  describe "with no arguments" do
-    let(:args) { [] }
-    its(:text) { should == '' }
-    its(:width) { should == klazz::STYLES[:width] }
-    its(:height) { should == klazz::STYLES[:height] }
-  end
-
-  describe "with a single text argument" do
-    let(:args) { ['Hello text here'] }
-
-    its(:text) { should == 'Hello text here' }
-  end
-
-  describe "with a style hash" do
-    let(:args) { [{width: 100, height: 50}] }
-
-    its(:text) { should == '' }
-  end
-
-  describe "with a text argument and a style hash" do
-    let(:args) { ['Hello text here', {width: 100, height: 50}] }
-    its(:text) { should == 'Hello text here' }
-    its(:width) { should == 100 }
-    its(:height) { should == 50 }
-  end
-end

data/spec/shoes/shared_examples/dsl/fill.rb

@@ -1,27 +0,0 @@
-shared_examples_for "fill DSL method" do
-  let(:color) { Shoes::COLORS.fetch :tomato }
-
-  it "returns a color" do
-    expect(dsl.fill(color).class).to eq(Shoes::Color)
-  end
-
-  # This works differently on a container than on a normal element
-  it "sets on receiver" do
-    dsl.fill color
-    expect(dsl.style[:fill]).to eq(color)
-  end
-
-  it "applies to subsequently created objects" do
-    dsl.fill color
-    oval = dsl.oval(10, 10, 100, 100)
-    expect(oval.fill).to eq(color)
-  end
-
-  context "with hex string" do
-    let(:color) { "#fff" }
-
-    it "sets the color" do
-      expect(dsl.fill(color)).to eq(Shoes::COLORS[:white])
-    end
-  end
-end

data/spec/shoes/shared_examples/dsl/flow.rb

@@ -1,15 +0,0 @@
-shared_examples_for "flow DSL method" do
-  let(:flow) { dsl.flow }
-
-  it "creates a Shoes::Flow" do
-    expect(flow).to be_an_instance_of(Shoes::Flow)
-  end
-
-  it 'reports an instance of Shoes::App when asked for its app' do
-    expect(flow.app.class).to eq Shoes::App
-  end
-
-  it 'reports an object that responds to stack when asked for its app' do
-    expect(flow.app).to respond_to :stack
-  end
-end

data/spec/shoes/shared_examples/dsl/gradient.rb

@@ -1,62 +0,0 @@
-shared_examples_for "creating gradient" do
-  it "returns correct gradient according to #to_s" do
-    expect(gradient.to_s).to eq("(Shoes::Gradient)")
-  end
-
-  it "returns correct gradient according to #inspect" do
-    expect(gradient.inspect).to match("[(]Shoes::Gradient:#{shoes_object_id_pattern} rgb[(]255, 0, 0[)]->rgb[(]0, 0, 255[)][)]")
-  end
-end
-
-shared_examples_for "gradient DSL method" do
-  context "with colors" do
-    include InspectHelpers
-
-    let(:red) { Shoes::Color.new(255, 0, 0) }
-    let(:blue) { Shoes::Color.new(0, 0, 255) }
-
-    context "two separate" do
-      it_behaves_like "creating gradient" do
-        let(:gradient) { dsl.gradient(red, blue) }
-      end
-    end
-
-    context "as range" do
-      it_behaves_like "creating gradient" do
-        let(:gradient) { dsl.gradient(red..blue) }
-      end
-    end
-  end
-
-  context "with strings" do
-    include InspectHelpers
-
-    let(:red) { "#f00" }
-    let(:blue) { "#00f" }
-
-    context "two separate" do
-      it_behaves_like "creating gradient" do
-        let(:gradient) { dsl.gradient(red, blue) }
-      end
-    end
-
-    context "as range" do
-      it_behaves_like "creating gradient" do
-        let(:gradient) { dsl.gradient(red..blue) }
-      end
-    end
-  end
-
-  context "with gradient" do
-    include InspectHelpers
-
-    it_behaves_like "creating gradient" do
-      let(:gradient_arg) { dsl.gradient("#f00", "#00f") }
-      let(:gradient) { dsl.gradient(gradient_arg) }
-    end
-  end
-
-  it "fails on bad input" do
-    expect { dsl.gradient(100) }.to raise_error(ArgumentError)
-  end
-end

data/spec/shoes/shared_examples/dsl/image.rb

@@ -1,21 +0,0 @@
-shared_examples_for "image DSL method" do
-  let(:path)  { Shoes::DIR + '/static/shoes-icon.png' }
-  let(:opts)  { {} }
-  let(:image) { dsl.image path, opts }
-
-  it 'should set the path' do
-    expect(image.file_path).to eq(path)
-  end
-
-  context 'with :top and :left style attributes' do
-    let(:opts) { {left: 55, top: 66} }
-
-    it 'should set the left' do
-      expect(image.left).to eq(55)
-    end
-
-    it 'should set the top' do
-      expect(image.top).to eq(66)
-    end
-  end
-end