shoes 4.0.0.pre1 → 4.0.0.pre2

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
-    checkbox.should be_instance_of Shoes::Check
-  end
-
-  it 'should be unchecked by default' do
-    checkbox.checked?.should be_false
-  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(:initial_text) { should == '' }
-    its(:width) { should == klazz::DEFAULT_STYLE[:width] }
-    its(:height) { should == klazz::DEFAULT_STYLE[:height] }
-  end
-
-  describe "with a single text argument" do
-    let(:args) { ['Hello text here'] }
-
-    its(:initial_text) { should == 'Hello text here' }
-  end
-
-  describe "with a style hash" do
-    let(:args) { [{width: 100, height: 50}] }
-
-    its(:initial_text) { should == '' }
-  end
-
-  describe "with a text argument and a style hash" do
-    let(:args) { ['Hello text here', {width: 100, height: 50}] }
-    its(:initial_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
-    dsl.fill(color).class.should eq(Shoes::Color)
-  end
-
-  # This works differently on a container than on a normal element
-  it "sets on receiver" do
-    dsl.fill color
-    dsl.style[:fill].should eq(color)
-  end
-
-  it "applies to subsequently created objects" do
-    dsl.fill color
-    oval = dsl.oval(10, 10, 100, 100)
-    oval.fill.should eq(color)
-  end
-
-  context "with hex string" do
-    let(:color) { "#fff" }
-
-    it "sets the color" do
-      dsl.fill(color).should 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,52 +0,0 @@
-shared_examples_for "creating gradient" do
-  it "returns correct gradient" do
-    gradient.to_s.should eq("<Shoes::Gradient #ff0000->#0000ff>")
-  end
-end
-
-shared_examples_for "gradient DSL method" do
-  context "with colors" do
-    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
-    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
-    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
-    lambda { dsl.gradient(100) }.should 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
-    image.file_path.should == path
-  end
-
-  context 'with :top and :left style attributes' do
-    let(:opts) { {left: 55, top: 66} }
-
-    it 'should set the left' do
-      image.left.should == 55
-    end
-
-    it 'should set the top' do
-      image.top.should == 66
-    end
-  end
-end

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

@@ -1,9 +0,0 @@
-shared_examples_for "line DSL method" do
-  it "creates a Shoes::Line" do
-    dsl.line(10, 15, 20, 30).should be_an_instance_of(Shoes::Line)
-  end
-
-  it "raises an ArgumentError" do
-    lambda { dsl.line(30) }.should raise_error(ArgumentError)
-  end
-end

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

@@ -1,6 +0,0 @@
-shared_examples_for "nofill DSL method" do
-  it "sets nil" do
-    dsl.nofill
-    dsl.style[:fill].should eq(nil)
-  end
-end

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

@@ -1,6 +0,0 @@
-shared_examples_for "nostroke DSL method" do
-  it "sets nil" do
-    dsl.nostroke
-    dsl.style[:stroke].should eq(nil)
-  end
-end

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

@@ -1,60 +0,0 @@
-shared_examples_for "an oval/circle element" do
-  it "makes a Shoes::Oval" do
-    oval.should be_instance_of(Shoes::Oval)
-  end
-
-  it "sets the proper dimensions" do
-    oval.top.should eq(top)
-    oval.left.should eq(left)
-    oval.width.should eq(width)
-    oval.height.should eq(height)
-  end
-end
-
-shared_examples_for "oval DSL method" do
-  let(:left)   { 20 }
-  let(:top)    { 30 }
-  let(:width)  { 100 }
-  let(:height) { 200 }
-
-  let(:oval) { dsl.oval(left, top, width, height) }
-
-  context "eccentric, from explicit arguments" do
-    it_behaves_like "an oval/circle element"
-  end
-
-  it "raises an ArgumentError" do
-    lambda { dsl.oval(10) }.should raise_error(ArgumentError)
-  end
-
-  context "a circle" do
-    let(:width) { height }
-
-    describe "when constructed from explicit arguments" do
-      it_behaves_like "an oval/circle element"
-    end
-
-    describe "when constructed with a top, left and diameter" do
-      let(:circle) { dsl.oval(left, top, width) }
-      it_behaves_like "an oval/circle element"
-    end
-
-    describe "when constructing from a style hash" do
-      describe "using left, top, height, width" do
-        let(:circle) { dsl.oval(left: left, top: top, width: width, height: height) }
-        it_behaves_like "an oval/circle element"
-      end
-
-      describe "using left, top, height, width, center: false" do
-        let(:circle) { dsl.oval(left: left, top: top, width: width, height: height, center: false) }
-        it_behaves_like "an oval/circle element"
-      end
-
-      describe "using left, top, diameter" do
-        let(:circle) { dsl.oval(left: left, top: top, diameter: width) }
-        it_behaves_like "an oval/circle element"
-      end
-    end
-  end
-
-end

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

@@ -1,34 +0,0 @@
-shared_examples_for "pattern DSL method" do
-  let(:honeydew) { Shoes::COLORS[:honeydew] }
-  let(:salmon) { Shoes::COLORS[:salmon] }
-
-  context "with single color" do
-    let(:pattern) { dsl.pattern honeydew }
-    it "returns the color" do
-      pattern.should eq(honeydew)
-    end
-  end
-
-  context "with color range" do
-    let(:pattern) { dsl.pattern honeydew..salmon }
-
-    it "returns a gradient" do
-      pattern.should eq(dsl.gradient honeydew..salmon)
-    end
-  end
-
-  context "with single string" do
-    let(:pattern) { dsl.pattern honeydew.hex }
-    it "returns the color" do
-      pattern.should eq(honeydew)
-    end
-  end
-
-  context "with string range" do
-    let(:pattern) { dsl.pattern honeydew.hex..salmon.hex }
-
-    it "returns a gradient" do
-      pattern.should eq(dsl.gradient honeydew..salmon)
-    end
-  end
-end

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

@@ -1,7 +0,0 @@
-shared_examples_for "progress DSL method" do
-  let(:progress) { dsl.progress }
-
-  it 'should be a progress bar' do
-    progress.should be_instance_of Shoes::Progress
-  end
-end

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

@@ -1,92 +0,0 @@
-shared_examples_for "rectangle dimensions" do
-  it "makes a Shoes::Rect" do
-    rect.should be_an_instance_of(Shoes::Rect)
-  end
-
-  it "sets proper dimensions" do
-    rect.left.should eq(left)
-    rect.top.should eq(top)
-    rect.width.should eq(width)
-    rect.height.should eq(height)
-  end
-end
-
-shared_examples_for "rect DSL method" do
-  let(:left)   { 40 }
-  let(:top)    { 30 }
-  let(:curve)  { 12 }
-
-  it "raises an ArgumentError" do
-    lambda { dsl.rect(30) }.should raise_exception(ArgumentError)
-  end
-
-  context 'unequal sides' do
-    let(:width)  { 200 }
-    let(:height) { 100 }
-
-    context "from explicit arguments" do
-      let(:rect) { dsl.rect left, top, width, height }
-
-      include_examples "rectangle dimensions"
-
-      it "defaults to corner radius of 0" do
-        rect.corners.should eq(0)
-      end
-    end
-
-    context "round corners, from explicit arguments" do
-      let(:rect) { dsl.rect left, top, width, height, curve }
-
-      include_examples "rectangle dimensions"
-
-      it "sets corner radius" do
-        rect.corners.should eq(curve)
-      end
-    end
-
-    context "from style hash" do
-      let(:rect) { dsl.rect left: left, top: top, width: width, height: height }
-
-      include_examples "rectangle dimensions"
-
-      it "defaults to corner radius of 0" do
-        rect.corners.should eq(0)
-      end
-    end
-
-    context "rounded corners, from style hash" do
-      let(:rect) { dsl.rect left: left, top: top, width: width, height: height, curve: curve }
-
-      include_examples "rectangle dimensions"
-
-      it "sets corner radius" do
-        rect.corners.should eq(curve)
-      end
-    end
-  end
-
-  context "square" do
-    let(:width)  { 200 }
-    let(:height) { 200 }
-
-    context "from explicit arguments" do
-      let(:rect) { dsl.rect left, top, width }
-
-      include_examples "rectangle dimensions"
-
-      it "defaults to corner radius of 0" do
-        rect.corners.should eq(0)
-      end
-    end
-
-    context "square, from style hash" do
-      let(:rect) { dsl.rect left: left, top: top, width: width }
-
-      include_examples "rectangle dimensions"
-
-      it "defaults to corner radius of 0" do
-        rect.corners.should eq(0)
-      end
-    end
-  end
-end

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

@@ -1,26 +0,0 @@
-shared_examples_for "rgb DSL method" do
-  let(:red) { 100 }
-  let(:green) { 149 }
-  let(:blue) { 237 }
-  let(:alpha) { 133 } # cornflowerblue
-
-  it "sends args to Shoes::Color" do
-    Shoes::Color.should_receive(:new).with(red, green, blue, alpha)
-    dsl.rgb(red, green, blue, alpha)
-  end
-
-  it "defaults to opaque" do
-    Shoes::Color.should_receive(:new).with(red, green, blue, Shoes::Color::OPAQUE)
-    dsl.rgb(red, green, blue)
-  end
-
-  describe "named color method" do
-    it "produces correct color" do
-      dsl.cornflowerblue.should eq(Shoes::Color.new red, green, blue)
-    end
-
-    it "accepts alpha arg" do
-      dsl.cornflowerblue(alpha).should eq(Shoes::Color.new red, green, blue, alpha)
-    end
-  end
-end

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

@@ -1,21 +0,0 @@
-shared_examples_for "shape DSL method" do
-  let(:shape) {
-    dsl.shape {
-      move_to 400, 300
-      line_to 400, 200
-      line_to 100, 100
-      line_to 400, 300
-      quad_to 100, 100, 20, 200
-    }
-  }
-
-  it "creates a Shoes::Shape" do
-    shape.should be_an_instance_of(Shoes::Shape)
-  end
-
-  it "receives style from app" do
-    green = Shoes::COLORS.fetch :green
-    dsl.style[:stroke] = green
-    shape.stroke.should eq(green)
-  end
-end