glue 0.20.0 → 0.21.0

data/test/glue/tc_flexob.rb

@@ -5,15 +5,15 @@ require 'glue/flexob'
 
 class TC_Flexob < Test::Unit::TestCase # :nodoc: all
 
-	def test_all
-		f = Flexob.new
-		f.title = 'Test'
-		f[:another] = 'Another'
-		
-		assert_equal 'Test', f.title
-		assert_equal 'Another', f.another
-		assert_equal 'Another', f[:another]
-		assert_equal 'Another', f['another']		
-	end
+  def test_all
+    f = Flexob.new
+    f.title = 'Test'
+    f[:another] = 'Another'
+    
+    assert_equal 'Test', f.title
+    assert_equal 'Another', f.another
+    assert_equal 'Another', f[:another]
+    assert_equal 'Another', f['another']    
+  end
 
 end

data/test/glue/tc_hash.rb

@@ -2,35 +2,35 @@ require "test/unit"
 require "glue/hash"
 
 class TestCaseGlueCache < Test::Unit::TestCase # :nodoc: all
-	include Glue
+  include Glue
 
-	def setup
-		@safe_cache = SafeHash.new(Hash.new)
-	end
+  def setup
+    @safe_cache = SafeHash.new(Hash.new)
+  end
 
-	def teardown
-		@safe_cache = nil
-	end
+  def teardown
+    @safe_cache = nil
+  end
 
-	def test_safe_cache
-		assert_equal(nil, @safe_cache["no_item"])
-		item1 =  "item1"
-		@safe_cache["key1"] = item1
-		assert_equal(item1, @safe_cache["key1"])
+  def test_safe_cache
+    assert_equal(nil, @safe_cache["no_item"])
+    item1 =  "item1"
+    @safe_cache["key1"] = item1
+    assert_equal(item1, @safe_cache["key1"])
 
-		@safe_cache["rem1"] = item1
-		@safe_cache.delete("rem1")
-		assert_equal(nil, @safe_cache["rem1"])
+    @safe_cache["rem1"] = item1
+    @safe_cache.delete("rem1")
+    assert_equal(nil, @safe_cache["rem1"])
 
-		@safe_cache.clear()
-		assert_equal(0, @safe_cache.size)
+    @safe_cache.clear()
+    assert_equal(0, @safe_cache.size)
 
-		@safe_cache["i1"] = "i1"
-		@safe_cache["i2"] = "i1"
-		@safe_cache["i3"] = "i1"
-		assert_equal(3, @safe_cache.size)
+    @safe_cache["i1"] = "i1"
+    @safe_cache["i2"] = "i1"
+    @safe_cache["i3"] = "i1"
+    assert_equal(3, @safe_cache.size)
 
-		assert_equal(3, @safe_cache.values.size)
-	end
+    assert_equal(3, @safe_cache.values.size)
+  end
 
 end

data/test/glue/tc_localization.rb

@@ -0,0 +1,49 @@
+$:.unshift File.join(File.dirname(__FILE__), '..', '..', 'lib')
+
+require 'test/unit'
+require 'ostruct'
+
+require 'glue/localization'
+
+class TestCaseLocalization < Test::Unit::TestCase # :nodoc: all
+  include Glue 
+
+  def setup
+    locale_en = {
+      'See you' => 'See you',
+      :long_paragraph => 'The best new books, up to 30% reduced price',
+      :price => 'Price: %d %s',
+      :proc_price => proc { |value, cur| "Price: #{value} #{cur}" }
+    }
+
+    locale_de = {
+      'See you' => 'Auf wieder sehen',
+      :long_paragraph => 'Die besten neuer buecher, bis zu 30% reduziert',
+      :price => 'Preis: %d %s',
+      :proc_price => proc { |value, cur| "Preis: #{value} #{cur}" }
+    }
+
+    Localization.add(
+      :en => locale_en,
+      :de => locale_de
+    )
+  end
+
+  def test_all
+    lc = Localization.get
+    assert_equal 'See you', lc['See you']
+    assert_equal 'The best new books, up to 30% reduced price', lc[:long_paragraph]
+    
+    lc = Localization.get(:en)
+    assert_equal 'See you', lc['See you']
+    assert_equal 'The best new books, up to 30% reduced price', lc[:long_paragraph]
+    assert_equal 'Price: 100 euro', lc[:price, 100, 'euro']
+    assert_equal 'Price: 100 euro', lc[:proc_price, 100, 'euro']
+
+    lc = Localization.get(:de)
+    assert_equal 'Auf wieder sehen', lc['See you']
+    assert_equal 'Die besten neuer buecher, bis zu 30% reduziert', lc[:long_paragraph]
+    assert_equal 'Preis: 100 euro', lc.translate(:price, 100, 'euro')
+    assert_equal 'Preis: 100 euro', lc[:proc_price, 100, 'euro']
+  end
+end

data/test/glue/tc_logger.rb

@@ -8,36 +8,36 @@ require 'glue/logger'
 
 class TC_Logger < Test::Unit::TestCase # :nodoc: all
 
-	def setup
-		@io = StringIO.new('')
-		Logger.set(Logger.new(@io))
-	end
-
-	def test_logger
-		Logger.info 'hello'
-		assert_equal(" INFO: hello\n", @io.string)
-
-		# bug: Binding.of_caller thinks Logger is the caller.
-		a = 14
-		b = 13
-		Logger.trace 'a * b'
-		assert_equal(" INFO: hello\nDEBUG: a * b = 182\n", @io.string)
-		
-		@io.string = ''
-		Logger.debug 'hello'
-		assert_equal("DEBUG: hello\n", @io.string)
-
-		# test logging level.
-		Logger.get.level = Logger::INFO
-		Logger.debug 'world'
-		assert_equal("DEBUG: hello\n", @io.string)
-
-		# bug:
-		Logger.error 'Have forgotten that :)'
-		
-		# 
-		Logger.set('hello.log')
-		assert_instance_of(Logger, Logger.get)
-	end
+  def setup
+    @io = StringIO.new('')
+    Logger.set(Logger.new(@io))
+  end
+
+  def test_logger
+    Logger.info 'hello'
+    assert_equal(" INFO: hello\n", @io.string)
+
+    # bug: Binding.of_caller thinks Logger is the caller.
+    a = 14
+    b = 13
+    Logger.trace 'a * b'
+    assert_equal(" INFO: hello\nDEBUG: a * b = 182\n", @io.string)
+    
+    @io.string = ''
+    Logger.debug 'hello'
+    assert_equal("DEBUG: hello\n", @io.string)
+
+    # test logging level.
+    Logger.get.level = Logger::INFO
+    Logger.debug 'world'
+    assert_equal("DEBUG: hello\n", @io.string)
+
+    # bug:
+    Logger.error 'Have forgotten that :)'
+    
+    # 
+    Logger.set('hello.log')
+    assert_instance_of(Logger, Logger.get)
+  end
 
 end

data/test/glue/tc_numbers.rb

@@ -2,17 +2,17 @@ require 'test/unit'
 require 'glue/number'
 
 class TestCaseNumberUtils < Test::Unit::TestCase # :nodoc: all
-	include Glue
+  include Glue
 
-	def setup
-	end
+  def setup
+  end
 
-	def teardown
-	end
+  def teardown
+  end
 
-	def test_ceil_multiple
-		assert_equal(20, NumberUtils.ceil_multiple(15, 10))
-		assert_equal(10, NumberUtils.ceil_multiple(1, 10))
-	end
+  def test_ceil_multiple
+    assert_equal(20, NumberUtils.ceil_multiple(15, 10))
+    assert_equal(10, NumberUtils.ceil_multiple(1, 10))
+  end
 
 end

data/test/glue/tc_property.rb

@@ -7,7 +7,7 @@ require 'glue/logger'
 require 'glue/property'
 
 def VarChar(size)
-	return String, :sql => "VARCHAR(#{ size })"
+  return String, :sql => "VARCHAR(#{ size })"
 end
 NotNull = {:sql => "NOT NULL"}.freeze
 Null = {:sql => "NULL"}.freeze
@@ -17,80 +17,80 @@ Property.type_checking = false
 module Test # :nodoc: all
 
 class Msg
-	include Og::Unmanageable
-	
-	prop Fixnum, :owner_oid
-	prop_accessor :val1, :val2, :val3, Fixnum, :sql => "smallint"
-	prop_accessor :title, :body, String
-	prop_accessor :test, String, :sql => "char(10) NOT NULL"
-	prop_accessor :count, Fixnum
-	prop_accessor :create_time, Time	
-
-	# a marshaled property
-	prop_accessor Array, :options
-
-	# property with macro arguments!
-	prop_accessor :address, VarChar(30), NotNull
-	
-	def initialize
-		@create_time = Time.now
-		@options = []
-	end
+  include Og::Unmanageable
+  
+  prop Fixnum, :owner_oid
+  prop_accessor :val1, :val2, :val3, Fixnum, :sql => "smallint"
+  prop_accessor :title, :body, String
+  prop_accessor :test, String, :sql => "char(10) NOT NULL"
+  prop_accessor :count, Fixnum
+  prop_accessor :create_time, Time  
+
+  # a marshaled property
+  prop_accessor Array, :options
+
+  # property with macro arguments!
+  prop_accessor :address, VarChar(30), NotNull
+  
+  def initialize
+    @create_time = Time.now
+    @options = []
+  end
 
 end
 
 class SubMsg < Msg
-	# to avoid conflicts with tc_og.rb
-	include Og::Unmanageable
-	
-	# duplicate definition with different type!
-	prop_accessor :count, Float
-
-	# another property
-	prop_accessor :another, Fixnum
+  # to avoid conflicts with tc_og.rb
+  include Og::Unmanageable
+  
+  # duplicate definition with different type!
+  prop_accessor :count, Float
+
+  # another property
+  prop_accessor :another, Fixnum
 end
 
 class TC_N_Properties < Test::Unit::TestCase
 
-	def setup
-		@msg1 = Msg.new
-	end
-
-	def teardown
-		@msg1 = nil
-	end
-
-	def test_props
-		
-		# bug: props for subclasses.
-		# bug: props propagated to base classes.
-
-		assert(SubMsg.__props)
-		assert_equal(Msg.__props.size(), SubMsg.__props.size() - 1)
-
-		assert_equal(11, Msg.__props.size)
-		assert_equal(12, SubMsg.__props.size)
-
-		# bug: duplicate definition 			
-		
-		assert_equal(Float, SubMsg.__props.find { |p| :count == p.symbol }.klass)
-
-		# dont force conversion
-		
-		@msg1.count = 2.4
-		assert_equal(Float, @msg1.count.class)
-
-		# force conversion
-		
-		@msg1.__force_count(2.4)
-		assert_equal(Fixnum, @msg1.count.class)		
-	end
-
-	def test_macro_params
-		sql = Msg.__props.find { |p| :address == p.symbol }.meta[:sql]
-		assert_equal 'VARCHAR(30) NOT NULL', sql
-	end
-	
+  def setup
+    @msg1 = Msg.new
+  end
+
+  def teardown
+    @msg1 = nil
+  end
+
+  def test_props
+    
+    # bug: props for subclasses.
+    # bug: props propagated to base classes.
+
+    assert(SubMsg.__props)
+    assert_equal(Msg.__props.size(), SubMsg.__props.size() - 1)
+
+    assert_equal(11, Msg.__props.size)
+    assert_equal(12, SubMsg.__props.size)
+
+    # bug: duplicate definition       
+    
+    assert_equal(Float, SubMsg.__props.find { |p| :count == p.symbol }.klass)
+
+    # dont force conversion
+    
+    @msg1.count = 2.4
+    assert_equal(Float, @msg1.count.class)
+
+    # force conversion
+    
+    @msg1.__force_count(2.4)
+    assert_equal(Fixnum, @msg1.count.class)    
+  end
+
+  def test_macro_params
+    sql = Msg.__props.find { |p| :address == p.symbol }.meta[:sql]
+    assert_equal 'VARCHAR(30) NOT NULL', sql
+  end
+  
 end
 
 end

data/test/glue/tc_property_mixins.rb

@@ -1,6 +1,6 @@
 # * Thomas Quas  <tquas@yahoo.com>
 # * George Moschovitis  <gm@navel.gr>
-# $Id: tc_property_mixins.rb 1 2005-04-11 11:04:30Z gmosx $
+# $Id: tc_property_mixins.rb 182 2005-07-22 10:07:50Z gmosx $
 
 $LOAD_PATH.unshift 'lib'
 
@@ -9,13 +9,13 @@ require 'glue/property'
 
 module Mixin
   prop_accessor :date
-	meta :dummy, [123]
+  meta :dummy, [123]
 end
 
 class MixedOnly
   include Mixin
-	__meta[:dummy] << 5
-	__meta[:dummy] << 3 
+  __meta[:dummy] << 5
+  __meta[:dummy] << 3 
 end
 
 class MixedOnly2
@@ -36,13 +36,13 @@ class Empty
 end
 
 class Base
-	prop_accessor :date
-	meta :dummy, [123]
+  prop_accessor :date
+  meta :dummy, [123]
 end
 
 class Child1 < Base
-	__meta[:dummy].first << 5
-	__meta[:dummy].first << 3 
+  __meta[:dummy].first << 5
+  __meta[:dummy].first << 3 
 end
 
 class Child2 < Base
@@ -74,15 +74,15 @@ class TC_MixinsTest < ::Test::Unit::TestCase
     assert( obj.respond_to?( :dummy ) )
   end
 
-	def test_crosspolination
-		assert_equal 3, MixedOnly.__meta[:dummy].size	
-		assert_equal 1, MixedOnly2.__meta[:dummy].size	
-		assert_equal 1, Mixin.__meta[:dummy].size	
+  def test_crosspolination
+    assert_equal 3, MixedOnly.__meta[:dummy].size  
+    assert_equal 1, MixedOnly2.__meta[:dummy].size  
+    assert_equal 1, Mixin.__meta[:dummy].size  
 =begin
-		gmosx: THINK!
-		assert_equal 3, Child1.__meta[:dummy].first.size	
-		assert_equal 1, Child2.__meta[:dummy].first.size	
-		assert_equal 1, Base.__meta[:dummy].first.size	
+    gmosx: THINK!
+    assert_equal 3, Child1.__meta[:dummy].first.size  
+    assert_equal 1, Child2.__meta[:dummy].first.size  
+    assert_equal 1, Base.__meta[:dummy].first.size  
 =end
-	end
+  end
 end