htmlgrid 1.1.7 → 1.2.2

data/test/test_datevalue.rb

@@ -21,40 +21,44 @@
 #	ywesee - intellectual capital connected, Winterthurerstrasse 52, CH-8006 Zuerich, Switzerland
 #	htmlgrid@ywesee.com, www.ywesee.com/htmlgrid
 #
-# TestDateValue -- htmlgrid -- 10.03.2003 -- hwyss@ywesee.com 
+# TestDateValue -- htmlgrid -- 10.03.2003 -- hwyss@ywesee.com
 
 $: << File.expand_path("../lib", File.dirname(__FILE__))
 
-require 'minitest/autorun'
-require 'htmlgrid/datevalue'
-require 'stub/cgi'
-require 'date'
+require "minitest/autorun"
+require "htmlgrid/datevalue"
+require "stub/cgi"
+require "date"
 
 class StubDateLookandfeel
-	def lookup(key)
-		'%d.%m.%Y'
-	end
-	def attributes(key)
-		{}
-	end
+  def lookup(key)
+    "%d.%m.%Y"
+  end
+
+  def attributes(key)
+    {}
+  end
 end
+
 class StubDateSession
-	def lookandfeel
-		StubDateLookandfeel.new
-	end
+  def lookandfeel
+    StubDateLookandfeel.new
+  end
 end
+
 class StubDateProvider
-	def date
-		Date.new(2002,1,1)
-	end
+  def date
+    Date.new(2002, 1, 1)
+  end
 end
 
 class TestDateValue < Minitest::Test
-	def setup
-		@component = HtmlGrid::DateValue.new(:date, StubDateProvider.new,
-			StubDateSession.new)
-	end
-	def test_formatted
-		assert_equal('01.01.2002', @component.to_html(CGI.new))
-	end
+  def setup
+    @component = HtmlGrid::DateValue.new(:date, StubDateProvider.new,
+      StubDateSession.new)
+  end
+
+  def test_formatted
+    assert_equal("01.01.2002", @component.to_html(CGI.new))
+  end
 end

data/test/test_divlist.rb

@@ -0,0 +1,126 @@
+#!/usr/bin/env ruby
+#
+#	HtmlGrid -- HyperTextMarkupLanguage Framework
+#	Copyright (C) 2003 ywesee - intellectual capital connected
+# Andreas Schrafl, Benjamin Fay, Hannes Wyss, Markus Huggler
+#
+# This library is free software; you can redistribute it and/or
+# modify it under the terms of the GNU Lesser General Public
+# License as published by the Free Software Foundation; either
+# version 2.1 of the License, or (at your option) any later version.
+#
+# This library is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+# Lesser General Public License for more details.
+#
+# You should have received a copy of the GNU Lesser General Public
+# License along with this library; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+#
+#	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
+
+$: << File.dirname(__FILE__)
+$: << File.expand_path("../lib", File.dirname(__FILE__))
+
+require "minitest/autorun"
+require "htmlgrid/divlist"
+require "stub/cgi"
+require "test_helper"
+
+module HtmlGrid
+  class DivList < DivComposite
+    attr_reader :grid
+  end
+end
+
+class StubDivList < HtmlGrid::DivList
+  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 StubDivListLookandfeel
+  def lookup(key)
+    key
+  end
+
+  def attributes(key)
+    {}
+  end
+end
+
+class StubDivListSession
+  attr_accessor :event
+  def lookandfeel
+    StubDivListLookandfeel.new
+  end
+end
+
+class StubDivListModel
+  attr_reader :foo
+  def initialize(foo)
+    @foo = foo
+  end
+
+  def jaguar
+    "Jaguar"
+  end
+
+  def panther
+    "Panther"
+  end
+end
+
+class StubDivListEmpty
+  attr_reader :foo
+  def initialize(foo)
+    @foo = foo
+  end
+end
+
+class TestDivList < Minitest::Test
+  def setup
+    model = [
+      StubDivListModel.new(3),
+      StubDivListModel.new(2),
+      StubDivListModel.new(4),
+      StubDivListModel.new(1),
+      StubDivListModel.new(nil)
+    ]
+    @list = StubDivList.new(model, StubDivListSession.new)
+  end
+
+  def test_nil_robust
+    list = StubDivList.new(nil, StubDivListSession.new)
+    assert_equal("", list.to_html(CGI.new))
+  end
+
+  def test_to_html
+    expected = "<DIV>JaguarPanther</DIV><DIV>JaguarPanther</DIV><DIV>JaguarPanther</DIV><DIV>JaguarPanther</DIV><DIV>JaguarPanther</DIV>"
+    assert_equal(expected, @list.to_html(CGI.new))
+  end
+
+  def test_nil_robust_to_html
+    list = StubDivList.new([nil], StubDivListSession.new)
+    expected = "<DIV></DIV>"
+    assert_equal(expected, list.to_html(CGI.new))
+  end
+
+  def test_nil_robust_to_html2
+    list = StubDivList.new([], StubDivListSession.new)
+    expected = ""
+    assert_equal(expected, list.to_html(CGI.new))
+  end
+end

data/test/test_dojotoolkit.rb

@@ -22,93 +22,107 @@
 # htmlgrid@ywesee.com, www.ywesee.com/htmlgrid
 #
 
-$: << File.expand_path('../lib', File.dirname(__FILE__))
+$: << File.expand_path("../lib", File.dirname(__FILE__))
 $: << File.dirname(__FILE__)
 
-require 'minitest/autorun'
-require 'stub/cgi'
-require 'htmlgrid/dojotoolkit'
-require 'test_helper'
-require 'flexmock/minitest'
-require 'sbsm/lookandfeel'
+require "minitest/autorun"
+require "stub/cgi"
+require "htmlgrid/template"
+require "htmlgrid/dojotoolkit"
+require "test_helper"
+require "flexmock/minitest"
+require "sbsm/lookandfeel"
 
 class TestDojotoolkit < Minitest::Test
   class StubAttributeComponent < HtmlGrid::Component
-    HTML_ATTRIBUTES = { "key" => "val" }
+    HTML_ATTRIBUTES = {"key" => "val"}
   end
+
   class StubInitComponent < HtmlGrid::Component
     attr_reader :init_called
     def init
       @init_called = true
     end
   end
+
   class StubLabelComponent < HtmlGrid::Component
     LABEL = true
   end
+
   class StubContainer
     attr_accessor :onsubmit
   end
+
   def setup
     @component = HtmlGrid::Component.new(nil, nil)
-    @session = flexmock('session') do |s|
-      s.should_receive(:user_agent).and_return('user_agent').by_default
+    @session = flexmock("session") do |s|
+      s.should_receive(:user_agent).and_return("user_agent").by_default
     end
     @cgi = CGI.new
   end
+
   def test_dynamic_html
     comp = HtmlGrid::Component.new("foo", @session)
-    comp.dojo_tooltip = 'my_tooltip'
+    comp.dojo_tooltip = "my_tooltip"
     assert_equal("foo", comp.model)
     assert_equal(false, comp.label?)
-    result= comp.dynamic_html(@cgi)
+    result = comp.dynamic_html(@cgi)
     assert(/href="my_tooltip"/.match(result))
   end
+
   def test_dynamic_html_with_msie
-    @session.should_receive(:user_agent).and_return('MSIE 4')
+    @session.should_receive(:user_agent).and_return("MSIE 4")
     comp = HtmlGrid::Component.new("foo", @session)
-    comp.dojo_tooltip = 'my_tooltip'
+    comp.dojo_tooltip = "my_tooltip"
     assert_equal("foo", comp.model)
     assert_equal(false, comp.label?)
-    result= comp.dynamic_html(@cgi)
+    result = comp.dynamic_html(@cgi)
     assert(/href="my_tooltip"/.match(result))
   end
 end
+
 class StubTemplateLookandfeel < SBSM::Lookandfeel
   RESOURCES = {
-    :css	=>	"test.css"
+    css: "test.css"
   }
   DICTIONARIES = {
     "de"	=>	{
-      :html_title	=>	"Test",
+      html_title: "Test"
     }
   }
   def lookandfeel
     self
   end
 end
+
 class StubTemplateSession
   def flavor
     "gcc"
   end
+
   def language
     "de"
   end
+
   def http_protocol
-    'http'
+    "http"
   end
+
   def server_name
     "testserver.com"
   end
+
   def server_port
-    '80'
+    "80"
   end
-  alias :default_language :language
+  alias_method :default_language, :language
 end
+
 class PublicTemplate < HtmlGrid::Template
   include HtmlGrid::DojoToolkit::DojoTemplate
   COMPONENTS = {}
   def dynamic_html_headers(context)
-    headers = super
+    _headers = super
   end
 end
 
@@ -117,16 +131,17 @@ class TestTemplate < Minitest::Test
     lookandfeel = StubTemplateLookandfeel.new(StubTemplateSession.new)
     @template = PublicTemplate.new(nil, lookandfeel, nil)
   end
+
   def test_dynamic_html_headers
     @cgi = CGI.new
-    result = @template.to_html(@cgi)
-    @session = flexmock('session')
+    _result = @template.to_html(@cgi)
+    @session = flexmock("session")
     comp = HtmlGrid::Component.new("foo", @session)
-    comp.dojo_tooltip = 'my_tooltip'
+    comp.dojo_tooltip = "my_tooltip"
     assert_equal("foo", comp.model)
     assert_equal(false, comp.label?)
-    result= comp.to_html(@cgi)
-    skip 'tooltip test does not work'
+    result = comp.to_html(@cgi)
+    skip "tooltip test does not work"
     assert(/href="my_tooltip"/.match(result))
   end
 end

data/test/test_form.rb

@@ -21,104 +21,120 @@
 #	ywesee - intellectual capital connected, Winterthurerstrasse 52, CH-8006 Zuerich, Switzerland
 #	htmlgrid@ywesee.com, www.ywesee.com/htmlgrid
 #
-# TestForm -- htmlgrid -- 25.11.2002 -- hwyss@ywesee.com 
+# TestForm -- htmlgrid -- 25.11.2002 -- hwyss@ywesee.com
 
 $: << File.dirname(__FILE__)
 $: << File.expand_path("../lib", File.dirname(__FILE__))
 
-require 'minitest/autorun'
-require 'htmlgrid/form'
-require 'stub/cgi'
+require "minitest/autorun"
+require "htmlgrid/form"
+require "stub/cgi"
 
 class StubFormModel; end
+
 class StubFormLookandfeel
-	def attributes(key)
-		{}
-	end
-	def base_url
-		'http://test.oddb.org/de/gcc'
-	end
-	def flavor
-		'gcc'
-	end
-	def language
-		'de'
-	end
-	def lookup(key)
-		'Submit-Value'
-	end
-	def lookandfeel
-		self
-	end
-	def state
-		0
-	end
+  def attributes(key)
+    {}
+  end
+
+  def base_url
+    "http://test.oddb.org/de/gcc"
+  end
+
+  def flavor
+    "gcc"
+  end
+
+  def language
+    "de"
+  end
+
+  def lookup(key)
+    "Submit-Value"
+  end
+
+  def lookandfeel
+    self
+  end
+
+  def state
+    0
+  end
 end
+
 class StubFormComponent < HtmlGrid::Component
-	def init
-		self.onsubmit = 'submitted'
-	end
+  def init
+    self.onsubmit = "submitted"
+  end
 end
+
 class Form < HtmlGrid::Form
-	EVENT = :foo
-	COMPONENTS = {}
-	public :submit
+  EVENT = :foo
+  COMPONENTS = {}
+  public :submit
 end
+
 class StubForm2 < HtmlGrid::Form
-	EVENT = :foo
-	COMPONENTS = {
-		[0,0] => StubFormComponent,
-	}
+  EVENT = :foo
+  COMPONENTS = {
+    [0, 0] => StubFormComponent
+  }
 end
+
 class StubFormMultiPart < HtmlGrid::Form
-	EVENT = :foo
-	COMPONENTS = {}
-	TAG_METHOD = :multipart_form
+  EVENT = :foo
+  COMPONENTS = {}
+  TAG_METHOD = :multipart_form
 end
 
 class TestForm < Minitest::Test
-	def setup
-		@model = StubFormModel.new
-		@lookandfeel = StubFormLookandfeel.new
-		@form = Form.new(@model, @lookandfeel)
-	end
-	def test_event
-		assert_equal(:foo, @form.event)
-	end
-	def test_multipart
-		form = StubFormMultiPart.new(@model, @lookandfeel)
-		result = form.to_html(CGI.new)
+  def setup
+    @model = StubFormModel.new
+    @lookandfeel = StubFormLookandfeel.new
+    @form = Form.new(@model, @lookandfeel)
+  end
+
+  def test_event
+    assert_equal(:foo, @form.event)
+  end
+
+  def test_multipart
+    form = StubFormMultiPart.new(@model, @lookandfeel)
+    result = form.to_html(CGI.new)
     expected = '<FORM NAME="stdform" METHOD="POST" ACTION="http://test.oddb.org/de/gcc" ACCEPT-CHARSET="UTF-8" ENCTYPE="multipart/form-data">'
     assert_equal(0, result.index(expected), "expected\n#{result}\nto start with\n#{expected}")
-	end
-	def test_to_html
-		result = @form.to_html(CGI.new)
+  end
+
+  def test_to_html
+    result = @form.to_html(CGI.new)
     expected = [
       '<INPUT TYPE="hidden" NAME="flavor" VALUE="gcc">',
       '<INPUT TYPE="hidden" NAME="language" VALUE="de">',
       '<INPUT NAME="event" ID="event" VALUE="foo" TYPE="hidden">',
-      '<INPUT TYPE="hidden" NAME="state_id" VALUE="1">',
+      '<INPUT TYPE="hidden" NAME="state_id" VALUE="1">'
     ]
-		expected.each_with_index { |line, idx|
-			assert(result.index(line), "#{idx}: missing #{line}\n     in #{result}")
-		}
-	end
-	def test_submit
+    expected.each_with_index { |line, idx|
+      assert(result.index(line), "#{idx}: missing #{line}\n     in #{result}")
+    }
+  end
+
+  def test_submit
     html = @form.submit(@model, @lookandfeel).to_html(CGI.new)
     expected = '<INPUT value="Submit-Value" type="submit" name="foo">'
-		assert_equal(expected, html)
-	end
-	def test_onsubmit
-		@form.onsubmit = 'submitted'
-		expected = 'onSubmit="submitted"'	
-		result = /<FORM[^>]+>/.match(@form.to_html(CGI.new))[0]
-		assert(result.index(expected), "missing:\n#{expected}\nin:\n#{result}")
-	end
-	def test_onsubmit_init
-		form = nil
-		form = StubForm2.new(@model, @lookandfeel)
-		expected = 'onSubmit="submitted"'	
-		result = /<FORM[^>]+>/.match(form.to_html(CGI.new))[0]
-		assert(result.index(expected), "missing:\n#{expected}\nin:\n#{result}")
-	end
+    assert_equal(expected, html)
+  end
+
+  def test_onsubmit
+    @form.onsubmit = "submitted"
+    expected = 'onSubmit="submitted"'
+    result = /<FORM[^>]+>/.match(@form.to_html(CGI.new))[0]
+    assert(result.index(expected), "missing:\n#{expected}\nin:\n#{result}")
+  end
+
+  def test_onsubmit_init
+    form = StubForm2.new(@model, @lookandfeel)
+    expected = 'onSubmit="submitted"'
+    result = /<FORM[^>]+>/.match(form.to_html(CGI.new))[0]
+    assert(result.index(expected), "missing:\n#{expected}\nin:\n#{result}")
+  end
 end