shoes-core 4.0.0.pre7 → 4.0.0.pre8

data/spec/shoes/star_spec.rb

@@ -1,49 +0,0 @@
-require 'spec_helper'
-
-shared_examples_for "basic star" do
-  it "retains app" do
-    expect(subject.app).to eq(app)
-  end
-
-  it "creates gui object" do
-    expect(subject.gui).not_to be_nil
-  end
-end
-
-describe Shoes::Star do
-  include_context "dsl app"
-
-  let(:left) { 44 }
-  let(:top) { 66 }
-  let(:width) { 100 }
-  let(:height) { 100 }
-
-  subject { Shoes::Star.new(app, parent, left, top, 5, 50, 30) }
-
-  it_behaves_like "basic star"
-  it_behaves_like "object with style" do
-    let(:subject_without_style) { Shoes::Star.new(app, parent, left, top, 5, 50, 30) }
-    let(:subject_with_style) { Shoes::Star.new(app, parent, left, top, 5, 50, 30, arg_styles) }
-  end
-
-  it_behaves_like "object with dimensions"
-  it_behaves_like "movable object"
-  it_behaves_like 'object with parent'
-  it_behaves_like "object with hover"
-
-  describe "in_bounds?" do
-    before do
-      # Gotta pretend like we've been positioned
-      subject.x_dimension.absolute_start = subject.left
-      subject.y_dimension.absolute_start = subject.top
-    end
-
-    it "in bounds" do
-      expect(subject.in_bounds?(50, 50)).to eq(true)
-    end
-
-    it "out of bounds" do
-      expect(subject.in_bounds?(200, 200)).to eq(false)
-    end
-  end
-end

data/spec/shoes/text_block_dimensions_spec.rb

@@ -1,77 +0,0 @@
-require 'spec_helper'
-
-describe Shoes::TextBlockDimensions do
-  let(:left)   { 0 }
-  let(:top)    { 10 }
-  let(:width)  { 5 }
-  let(:height) { 10 }
-
-  let(:old_dimension) { Shoes::Dimensions.new(nil, left, top, width, height) }
-  subject             { Shoes::TextBlockDimensions.new(nil, left, top, width, height) }
-
-  before(:each) do
-    old_dimension.absolute_left = subject.absolute_left = 0
-    old_dimension.absolute_top  = subject.absolute_top  = 0
-  end
-
-  describe "positions" do
-    it "inherits from base" do
-      expect(subject.absolute_right).to eq(old_dimension.absolute_right)
-      expect(subject.absolute_bottom).to eq(old_dimension.absolute_bottom)
-    end
-
-    it "overrides absolute right" do
-      subject.absolute_right = 200
-      expect(subject.absolute_right).to eq(200)
-    end
-
-    it "overrides absolute bottom" do
-      subject.absolute_bottom = 200
-      expect(subject.absolute_bottom).to eq(200)
-    end
-  end
-
-  describe "calculated sizes" do
-    it "inherits from base" do
-      expect(subject.width).to  eq(5)
-      expect(subject.height).to eq(10)
-    end
-
-    it "override with calculated width" do
-      subject.width = nil
-      subject.calculated_width = 200
-      expect(subject.width).to eq(200)
-    end
-
-    it "override with calculated height" do
-      subject.height = nil
-      subject.calculated_height = 200
-      expect(subject.height).to eq(200)
-    end
-  end
-
-  describe "containing width" do
-    it "uses immediate width if it can" do
-      expect(subject.containing_width).to eq(5)
-    end
-
-    it "applies margins" do
-      subject.margin = 1
-      expect(subject.containing_width).to eq(3)
-    end
-
-    describe "with parent" do
-      let(:parent) do
-        double('parent', element_width: 100,
-                         x_dimension: double("x"),
-                         y_dimension: double("y"))
-      end
-
-      subject { Shoes::TextBlockDimensions.new(parent, left, top, nil, height) }
-
-      it "delegates to parent if no width of its own" do
-        expect(subject.containing_width).to eq(100)
-      end
-    end
-  end
-end

data/spec/shoes/text_block_spec.rb

@@ -1,314 +0,0 @@
-require 'spec_helper'
-require 'shoes/helpers/sample17_helper'
-
-describe Shoes::TextBlock do
-  include_context "dsl app"
-
-  let(:text_link) { Shoes::Link.new(app, ['Hello']) }
-  let(:text) { [text_link, ", world!"] }
-  subject(:text_block) { Shoes::Para.new(app, parent, text, app: app) }
-
-  it_behaves_like "object with style" do
-    let(:subject_without_style) { Shoes::Para.new(app, parent, text) }
-    let(:subject_with_style) { Shoes::Para.new(app, parent, text, arg_styles) }
-  end
-
-  it_behaves_like "object with hover"
-
-  describe "initialize" do
-    it "creates gui object" do
-      expect(text_block.gui).not_to be_nil
-    end
-  end
-
-  describe "text" do
-    context "with an array of [Shoes::Link, String]" do
-      it "sets text" do
-        expect(text_block.text).to eq "Hello, world!"
-      end
-
-      it "changes the text" do
-        text_block.text = "Goodbye Cruel World"
-        expect(text_block.text).to eq "Goodbye Cruel World"
-      end
-    end
-
-    context "with a single string" do
-      let(:text) { "Hello, world!" }
-
-      it "sets text" do
-        expect(text_block.text).to eq "Hello, world!"
-      end
-
-      it "changes the text" do
-        text_block.text = "Goodbye Cruel World"
-        expect(text_block.text).to eq "Goodbye Cruel World"
-      end
-    end
-  end
-
-  describe "#takes_up_space?" do
-    it "does with default alignment" do
-      expect(text_block.takes_up_space?).to eq(true)
-    end
-
-    it "does when left aligned" do
-      text_block.align = "left"
-      expect(text_block.takes_up_space?).to eq(true)
-    end
-
-    it "doesn't when right aligned" do
-      text_block.align = "right"
-      expect(text_block.takes_up_space?).to eq(false)
-    end
-  end
-
-  describe "#to_s" do
-    it "is the same as #text" do
-      text = text_block.text
-      expect(text_block.to_s).to eq(text)
-    end
-  end
-
-  describe "#replace" do
-    it "replaces text" do
-      text_block.replace "Goodbye Cruel World"
-      expect(text_block.text).to eq("Goodbye Cruel World")
-    end
-
-    it "allows two arguments" do
-      text_block.replace "Goodbye Cruel World, ", text_link
-      expect(text_block.text).to eq("Goodbye Cruel World, Hello")
-    end
-
-    it "updates contents" do
-      text_block.replace("Later Gator")
-      expect(text_block.contents).to eq(["Later Gator"])
-    end
-
-    it "updates text styles" do
-      text_block.replace "Later Gator"
-      expect(text_block.text_styles).to be_empty
-    end
-
-    it "updates styles from options hash" do
-      text_block.replace "Later Gator", stroke: Shoes::COLORS[:aquamarine]
-      expect(text_block.stroke).to eq(Shoes::COLORS[:aquamarine])
-    end
-
-    it "updates font from options hash" do
-      text_block.replace "Later Gator", font: 'Monospace 18px'
-      expect(text_block.font).to eq('Monospace')
-      expect(text_block.size).to eq(18)
-    end
-  end
-
-  describe "#contents" do
-    it "returns text elements" do
-      expect(text_block.contents).to eql([text_link, ", world!"])
-    end
-  end
-
-  describe "font" do
-    let(:text_block) { Shoes::Para.new(app, parent, ["Hello, world!"], style) }
-
-    context "with defaults" do
-      let(:style) { Hash.new }
-
-      it "sets the default font to Arial" do
-        expect(text_block.font).to eq "Arial"
-      end
-    end
-
-    context "with a font family string" do
-      let(:style) { { font: "Helvetica" } }
-
-      it "sets the font family" do
-        expect(text_block.font).to eq "Helvetica"
-      end
-    end
-
-    context "with a font family string and size with 'px'" do
-      let(:style) { { font: "Helvetica 33px" } }
-
-      it "sets the font family" do
-        expect(text_block.font).to eq "Helvetica"
-      end
-
-      it "sets the font size" do
-        expect(text_block.size).to eq 33
-      end
-    end
-
-    context "with a font family string and size with ' px'" do
-      let(:style) { { font: "Helvetica 33 px" } }
-
-      it "sets the font family" do
-        expect(text_block.font).to eq "Helvetica"
-      end
-
-      it "sets the font size" do
-        expect(text_block.size).to eq 33
-      end
-    end
-
-    context "with a quoted font family string and size with 'px'" do
-      let(:style) { { font: '"Comic Sans" 13px' } }
-
-      it "sets the font family" do
-        expect(text_block.font).to eq "Comic Sans"
-      end
-
-      it "sets the size" do
-        expect(text_block.size).to eq 13
-      end
-    end
-  end
-
-  describe "stroke" do
-    it "should accept a hex code" do
-      s = Shoes::Para.new(app, parent, ["Hello, world!"], stroke: "#fda", app: app)
-      color = s.style[:stroke]
-      expect(color.red).to eql 255
-      expect(color.green).to eql 221
-      expect(color.blue).to eql 170
-    end
-  end
-
-  describe "width" do
-    before(:each) do
-      allow(parent).to receive(:element_width) { 300 }
-      allow(parent).to receive(:absolute_left) { 0 }
-    end
-
-    context "when not explicitly set" do
-      subject(:text_block) { Shoes::Para.new(app, parent, ["text"]) }
-
-      it "delegates to calculated width" do
-        subject.calculated_width = 240
-        expect(subject.width).to eql 240
-      end
-
-      it "delegates to calculated height" do
-        subject.calculated_height = 240
-        expect(subject.height).to eql 240
-      end
-
-      it "bases desired width off parent" do
-        subject.absolute_left = 20
-        expect(subject.desired_width).to eql 280
-      end
-
-      it "can base desired off explicit containing width" do
-        subject.absolute_left = 20
-        expect(subject.desired_width(1000)).to eql(980)
-      end
-
-      it "factors margins into desired width" do
-        subject.absolute_left = 0
-        subject.margin = 10
-        expect(subject.desired_width(1000)).to eql(980)
-      end
-    end
-
-    context "when explicitly set" do
-      subject(:text_block) { Shoes::Para.new(app, parent, ["text"], width: 120) }
-
-      it "gets returned" do
-        expect(subject.width).to eql 120
-      end
-
-      it "is used for desired width" do
-        expect(subject.desired_width).to eql 120
-      end
-
-      it "factors in if parent space is too small" do
-        subject.absolute_left = parent.element_width - 100
-        expect(subject.desired_width).to eql(100)
-      end
-    end
-  end
-
-  context "cursor management" do
-    let(:textcursor) { double("textcursor") }
-
-    before(:each) do
-      allow(app).to receive(:textcursor) { textcursor }
-    end
-
-    it "creates a textcursor" do
-      expect(subject.textcursor).to eq(textcursor)
-      expect(app).to have_received(:textcursor)
-    end
-
-    it "only creates textcursor" do
-      original = subject.textcursor
-      allow(app).to receive(:textcursor) { double("new cursor") }
-
-      expect(subject.textcursor).to eq(original)
-      expect(app).to have_received(:textcursor).once
-    end
-  end
-
-  context "with empty subelements" do
-    let!(:link) { actual_app.link('') }
-    let!(:span) { actual_app.span('') }
-    let!(:para) { actual_app.para(link, span) }
-    let(:actual_app) { app.app }
-
-    it "properly ignores empty element lengths in text_styles" do
-      text_styles = { 0...0 => [link, span] }
-
-      expect(para.text_styles).to eq(text_styles)
-    end
-  end
-
-  # Emulates samples/sample17.rb
-  #
-  #   Shoes.app width: 240, height: 95 do
-  #     para 'Testing, test, test. ',
-  #       strong('Breadsticks. '),
-  #       em('Breadsticks. '),
-  #       code('Breadsticks. '),
-  #       bg(fg(strong(ins('EVEN BETTER.')), white), rgb(255, 0, 192)),
-  #       sub('fine!')
-  #   end
-  #
-  context "with nested text fragments" do
-    let(:helper) { Sample17Helper.new(app) }
-    let!(:para) { helper.create_para }
-
-    it "has full text of fragments" do
-      expect(para.text).to eq("Testing, test, test. Breadsticks. Breadsticks. Breadsticks. EVEN BETTER.fine!")
-    end
-
-    it "has fragment styles" do
-      text_styles = {
-        21..33 => [helper.strong_breadsticks],
-        34..46 => [helper.em],
-        47..59 => [helper.code],
-        60..71 => [helper.bg, helper.fg, helper.strong, helper.ins],
-        72..76 => [helper.sub]
-      }
-      expect(para.text_styles).to eq(text_styles)
-    end
-
-    it 'sets the parent_text of the non nested texts to the para' do
-      expect(helper.strong_breadsticks.parent).to eq para
-    end
-
-    it 'sets the parent_text of nested fragments correctly' do
-      expect(helper.ins.parent).to eq helper.strong
-    end
-
-    it 'lets the nested text fragements know what their text block is' do
-      expect(helper.ins.text_block).to eq para
-    end
-  end
-
-  describe "links" do
-    it "finds em" do
-      expect(text_block.links).to eq([text_link])
-    end
-  end
-end

data/spec/shoes/text_spec.rb

@@ -1,22 +0,0 @@
-require 'spec_helper'
-
-describe Shoes::Text do
-  include_context "dsl app"
-
-  let(:link) { Shoes::Link.new(app, ['link']) }
-
-  it "finds no links" do
-    text = Shoes::Text.new(['text'])
-    expect(text.links).to be_empty
-  end
-
-  it "finds a link" do
-    text = Shoes::Text.new(['text', link])
-    expect(text.links).to eq([link])
-  end
-
-  it "finds multiple" do
-    text = Shoes::Text.new([Shoes::Text.new(['yo', link]), link])
-    expect(text.links).to eq([link, link])
-  end
-end