htmlgrid 1.1.7 → 1.2.2

data/test/test_label.rb

@@ -21,91 +21,105 @@
 #	ywesee - intellectual capital connected, Winterthurerstrasse 52, CH-8006 Zuerich, Switzerland
 #	htmlgrid@ywesee.com, www.ywesee.com/htmlgrid
 #
-# TestLabel -- htmlgrid -- 26.11.2002 -- hwyss@ywesee.com 
+# TestLabel -- htmlgrid -- 26.11.2002 -- hwyss@ywesee.com
 
 $: << File.dirname(__FILE__)
 $: << File.expand_path("../lib", File.dirname(__FILE__))
 
-require 'minitest/autorun'
-require 'stub/cgi'
-require 'htmlgrid/label'
-require 'htmlgrid/composite'
+require "minitest/autorun"
+require "stub/cgi"
+require "htmlgrid/label"
+require "htmlgrid/composite"
 
 class TestLabel < Minitest::Test
-	class StubLabelState
-		attr_reader :errors
-		def initialize(errors={})
-			@errors = errors
-		end
-	end
-	class StubLabelModel
-	end
-	class StubLabelSession
-		attr_writer :state
-		def state
-			@state ||= StubLabelState.new
-		end
-		def lookup(key)
-			case key
-			when :componentname
-				'Label'
-			when :named_component
-				'Named Label'
-			end
-		end
-		def lookandfeel
-			self
-		end
-		def error(key)
-			state.errors[key]
-		end
-	end
-	class StubLabelComponent < HtmlGrid::Component
-		attr_accessor :mey
-    def initialize(model, session=nil, container=nil)
+  class StubLabelState
+    attr_reader :errors
+    def initialize(errors = {})
+      @errors = errors
+    end
+  end
+
+  class StubLabelModel
+  end
+
+  class StubLabelSession
+    attr_writer :state
+    def state
+      @state ||= StubLabelState.new
+    end
+
+    def lookup(key)
+      case key
+      when :componentname
+        "Label"
+      when :named_component
+        "Named Label"
+      end
+    end
+
+    def lookandfeel
+      self
+    end
+
+    def error(key)
+      state.errors[key]
+    end
+  end
+
+  class StubLabelComponent < HtmlGrid::Component
+    attr_accessor :mey
+    def initialize(model, session = nil, container = nil)
       @mey = nil
       super
     end
-		def to_html(context)
-			'component'
-		end
-		def label?
-			true
-		end
-		def name
-			:componentname
-		end
-		def css_class
-			@mey
-		end
-	end
-	class StubLabelComposite < HtmlGrid::Composite
-		COMPONENTS = {
-			[0,0]	=>	StubLabelComponent,
-			[0,1]	=>	:named_component,
-		}
-		LABELS = true
-		def named_component(model, session)
-			@named_component ||= StubLabelComponent.new(model, session, self)
-		end
-	end
-	def	setup
-		@session = StubLabelSession.new
-		#@label = HtmlGrid::Label.new(component)
-	end		
-	def test_to_html1
-		composite = StubLabelComposite.new(StubLabelModel.new, @session)
-		expected = '<TABLE cellspacing="0"><TR>'
-		expected << '<TD><LABEL for="componentname">Label</LABEL></TD>'
-		expected << '<TD>component</TD></TR>'
-		expected << '<TR><TD><LABEL for="componentname">Named Label</LABEL></TD>'
-		expected << '<TD>component</TD></TR></TABLE>'
-		assert_equal(expected, composite.to_html(CGI.new))
-	end	
-	def test_to_html2
-		@session.state = StubLabelState.new({:named_component => 'ein Error'})
-		composite = StubLabelComposite.new(StubLabelModel.new, @session)
+
+    def to_html(context)
+      "component"
+    end
+
+    def label?
+      true
+    end
+
+    def name
+      :componentname
+    end
+
+    def css_class
+      @mey
+    end
+  end
+
+  class StubLabelComposite < HtmlGrid::Composite
+    COMPONENTS = {
+      [0, 0]	=>	StubLabelComponent,
+      [0, 1]	=>	:named_component
+    }
+    LABELS = true
+    def named_component(model, session)
+      @named_component ||= StubLabelComponent.new(model, session, self)
+    end
+  end
+
+  def	setup
+    @session = StubLabelSession.new
+    # @label = HtmlGrid::Label.new(component)
+  end
+
+  def test_to_html1
+    composite = StubLabelComposite.new(StubLabelModel.new, @session)
+    expected = '<TABLE cellspacing="0"><TR>'
+    expected << '<TD><LABEL for="componentname">Label</LABEL></TD>'
+    expected << "<TD>component</TD></TR>"
+    expected << '<TR><TD><LABEL for="componentname">Named Label</LABEL></TD>'
+    expected << "<TD>component</TD></TR></TABLE>"
+    assert_equal(expected, composite.to_html(CGI.new))
+  end
+
+  def test_to_html2
+    @session.state = StubLabelState.new({named_component: "ein Error"})
+    composite = StubLabelComposite.new(StubLabelModel.new, @session)
     expected = '<TABLE cellspacing="0"><TR><TD><LABEL for="componentname">Label</LABEL></TD><TD>component</TD></TR><TR><TD><LABEL for="componentname" class="error">Named Label</LABEL></TD><TD>component</TD></TR></TABLE>'
-		assert_equal(expected, composite.to_html(CGI.new))
-	end
+    assert_equal(expected, composite.to_html(CGI.new))
+  end
 end

data/test/test_list.rb

@@ -21,118 +21,133 @@
 #	ywesee - intellectual capital connected, Winterthurerstrasse 52, CH-8006 Zuerich, Switzerland
 #	htmlgrid@ywesee.com, www.ywesee.com/htmlgrid
 #
-# TestList -- htmlgrid -- 03.03.2003 -- hwyss@ywesee.com 
+# TestList -- htmlgrid -- 03.03.2003 -- hwyss@ywesee.com
 
 $: << File.dirname(__FILE__)
 $: << File.expand_path("../lib", File.dirname(__FILE__))
 
-require 'minitest/autorun'
-require 'htmlgrid/list'
-require 'stub/cgi'
-require 'test_helper'
+require "minitest/autorun"
+require "htmlgrid/list"
+require "stub/cgi"
+require "test_helper"
 
 module HtmlGrid
-	class List < Composite
-		attr_reader :grid
-		public :lookandfeel_key
-	end
+  class List < Composite
+    attr_reader :grid
+    public :lookandfeel_key
+  end
 end
+
 class StubListViewColumnNames < HtmlGrid::List
-	LOOKANDFEEL_MAP = {
-		:raffi	=>	:waltert,
-		:andy		=>	:schrafl,
-	}
-	COMPONENTS = {}
+  LOOKANDFEEL_MAP = {
+    raffi: :waltert,
+    andy: :schrafl
+  }
+  COMPONENTS = {}
 end
+
 class StubList < HtmlGrid::List
-	attr_reader :model
-	COMPONENTS = {
-		[0,0]	=>	:jaguar,
-		[1,0]	=>	:panther,
-	}	
-	CSS_MAP = {
-		[0,0]	=>	'flecken',
-		[1,0]	=>	'schwarz',
-	}
-	SORT_HEADER = false
-	SORT_DEFAULT = :foo
+  attr_reader :model
+  COMPONENTS = {
+    [0, 0]	=>	:jaguar,
+    [1, 0]	=>	:panther
+  }
+  CSS_MAP = {
+    [0, 0]	=>	"flecken",
+    [1, 0]	=>	"schwarz"
+  }
+  SORT_HEADER = false
+  SORT_DEFAULT = :foo
 end
+
 class StubListLookandfeel
-	def lookup(key)
-		key
-	end
-	def attributes(key)
-		{}
-	end
+  def lookup(key)
+    key
+  end
+
+  def attributes(key)
+    {}
+  end
 end
+
 class StubListSession
-	attr_accessor :event
-	def lookandfeel
-		StubListLookandfeel.new
-	end
+  attr_accessor :event
+  def lookandfeel
+    StubListLookandfeel.new
+  end
 end
+
 class StubListModel
-	attr_reader :foo
-	def initialize(foo)
-		@foo = foo
-	end
-	def jaguar
-		'Jaguar'
-	end
-	def panther
-		'Panther'
-	end
-end	
+  attr_reader :foo
+  def initialize(foo)
+    @foo = foo
+  end
+
+  def jaguar
+    "Jaguar"
+  end
+
+  def panther
+    "Panther"
+  end
+end
 
 class TestList < Minitest::Test
-	def setup
-		model = [
-			StubListModel.new(3),
-			StubListModel.new(2),
-			StubListModel.new(4),
-			StubListModel.new(1),
-		]
-		@list = StubList.new(model, StubListSession.new)
-	end
-	def test_compose
-		@list.compose
-		assert_equal(5, @list.grid.height)
-		assert_equal(2, @list.grid.width)
-	end
-	def test_default_sort
-		foos = @list.model.collect { |item| item.foo }
-		expected = [ 1,2,3,4 ]
-		assert_equal(expected, foos)
-	end
-	def test_header
-		expected = '<TABLE cellspacing="0"><TR><TH title="th_jaguar_title">th_jaguar</TH><TH title="th_panther_title">th_panther</TH>'
-		assert_equal(0, @list.to_html(CGI.new).index(expected))
-	end
-	def test_lookandfeel_key
-		list = StubListViewColumnNames.new([], StubListSession.new)
-		assert_equal(:waltert, list.lookandfeel_key(:raffi))	
-		assert_equal(:hannes, list.lookandfeel_key(:hannes))	
-	end
-	def test_nil_robust
+  def setup
+    model = [
+      StubListModel.new(3),
+      StubListModel.new(2),
+      StubListModel.new(4),
+      StubListModel.new(1)
+    ]
+    @list = StubList.new(model, StubListSession.new)
+  end
+
+  def test_compose
+    @list.compose
+    assert_equal(5, @list.grid.height)
+    assert_equal(2, @list.grid.width)
+  end
+
+  def test_default_sort
+    foos = @list.model.collect { |item| item.foo }
+    expected = [1, 2, 3, 4]
+    assert_equal(expected, foos)
+  end
+
+  def test_header
+    expected = '<TABLE cellspacing="0"><TR><TH title="th_jaguar_title">th_jaguar</TH><TH title="th_panther_title">th_panther</TH>'
+    assert_equal(0, @list.to_html(CGI.new).index(expected))
+  end
+
+  def test_lookandfeel_key
+    list = StubListViewColumnNames.new([], StubListSession.new)
+    assert_equal(:waltert, list.lookandfeel_key(:raffi))
+    assert_equal(:hannes, list.lookandfeel_key(:hannes))
+  end
+
+  def test_nil_robust
     StubList.new(nil, StubListSession.new)
-	end
-	def test_suffix
-		@list.compose
-		expected = {
-			[0,1]	=>	"flecken",
-			[1,1]	=>	"schwarz",
-			[0,2]	=>	"flecken-bg",
-			[1,2]	=>	"schwarz-bg",
-			[0,3]	=>	"flecken",
-			[1,3]	=>	"schwarz",
-			[0,4]	=>	"flecken-bg",
-			[1,4]	=>	"schwarz-bg",
-		}
-		expected.each { |key, value|
-			assert_equal(value, @list.grid.field_attribute("class", *key))
-		}
-	end
-	def test_title
-		assert_equal('th_jaguar_title', @list.grid.field_attribute('title', 0, 0))
-	end
+  end
+
+  def test_suffix
+    @list.compose
+    expected = {
+      [0, 1]	=>	"flecken",
+      [1, 1]	=>	"schwarz",
+      [0, 2]	=>	"flecken-bg",
+      [1, 2]	=>	"schwarz-bg",
+      [0, 3]	=>	"flecken",
+      [1, 3]	=>	"schwarz",
+      [0, 4]	=>	"flecken-bg",
+      [1, 4]	=>	"schwarz-bg"
+    }
+    expected.each { |key, value|
+      assert_equal(value, @list.grid.field_attribute("class", *key))
+    }
+  end
+
+  def test_title
+    assert_equal("th_jaguar_title", @list.grid.field_attribute("title", 0, 0))
+  end
 end

data/test/test_select.rb

@@ -21,50 +21,55 @@
 #	ywesee - intellectual capital connected, Winterthurerstrasse 52, CH-8006 Zuerich, Switzerland
 #	htmlgrid@ywesee.com, www.ywesee.com/htmlgrid
 #
-# TestSelect -- htmlgrid -- 10.03.2003 -- hwyss@ywesee.com 
+# TestSelect -- htmlgrid -- 10.03.2003 -- hwyss@ywesee.com
 
 $LOAD_PATH << File.expand_path("../lib", File.dirname(__FILE__))
 $LOAD_PATH << File.dirname(__FILE__)
 
-require 'minitest/autorun'
-require 'htmlgrid/select'
-require 'stub/cgi'
+require "minitest/autorun"
+require "htmlgrid/select"
+require "stub/cgi"
 
 class StubSelectLookandfeel
-	def attributes(key)
-		{}
-	end
-	def lookup(key)
-		{
-			'foofoo'	=>	'Foo Nr. 1',
-			'foobar'	=>	'Foo Nr. 2',
-			'barfoo'	=>	'Bar Nr. 1',
-			'barbar'	=>	'Bar Nr. 2',
-			'foovals'	=>	'FooLabel',
-		}.fetch(key)
-	end
+  def attributes(key)
+    {}
+  end
+
+  def lookup(key)
+    {
+      "foofoo"	=>	"Foo Nr. 1",
+      "foobar"	=>	"Foo Nr. 2",
+      "barfoo"	=>	"Bar Nr. 1",
+      "barbar"	=>	"Bar Nr. 2",
+      "foovals"	=>	"FooLabel"
+    }.fetch(key)
+  end
 end
+
 class StubSelectSession
-	def valid_values(key)
-		[ 'foofoo', 'foobar', 'barfoo', 'barbar' ]
-	end
-	def lookandfeel
-		StubSelectLookandfeel.new
-	end
+  def valid_values(key)
+    ["foofoo", "foobar", "barfoo", "barbar"]
+  end
+
+  def lookandfeel
+    StubSelectLookandfeel.new
+  end
 end
+
 class StubSelectData
-	def foovals
-		'foobar'
-	end
+  def foovals
+    "foobar"
+  end
 end
 
 class TestSelect < Minitest::Test
-	def setup
-		@component = HtmlGrid::Select.new(:foovals, StubSelectData.new,
-			StubSelectSession.new)
-	end
+  def setup
+    @component = HtmlGrid::Select.new(:foovals, StubSelectData.new,
+      StubSelectSession.new)
+  end
+
   def test_to_html
-    assert_equal(<<-SEL.gsub(/\n|^\s*/, ''), @component.to_html(CGI.new).to_s)
+    assert_equal(<<-SEL.gsub(/\n|^\s*/, ""), @component.to_html(CGI.new).to_s)
     <SELECT name="foovals">
     <OPTION value="foofoo">Foo Nr. 1</OPTION>
     <OPTION value="foobar" selected>Foo Nr. 2</OPTION>