money 3.6.1 → 3.6.2

data/spec/core_extensions_spec.rb

@@ -1,142 +1,158 @@
-require "spec_helper"
-
-describe "Money core extensions" do
-
-  describe Numeric do
-    describe "#to_money" do
-      it "should work" do
-        money = 1234.to_money
-        money.cents.should == 1234_00
-        money.currency.should == Money.default_currency
-
-        money = 100.37.to_money
-        money.cents.should == 100_37
-        money.currency.should == Money.default_currency
-
-        money = BigDecimal.new('1234').to_money
-        money.cents.should == 1234_00
-        money.currency.should == Money.default_currency
-      end
-
-      it "should accept optional currency" do
-        1234.to_money('USD').should == Money.new(123400, 'USD')
-        1234.to_money('EUR').should == Money.new(123400, 'EUR')
-      end
-
-      it "should respect :subunit_to_unit currency property" do
-        10.to_money('USD').should == Money.new(10_00, 'USD')
-        10.to_money('TND').should == Money.new(10_000, 'TND')
-        10.to_money('CLP').should == Money.new(10, 'CLP')
-      end
-
-      specify "#issue/15" do
-        amount = 555.55.to_money
-        amount.should == Money.new(55555)
-      end
-    end
-  end
-
-  describe String do
-    describe "#to_money" do
-
-      StringToMoney = {
-        "20.15"           => Money.new(20_15)             ,
-        "100"             => Money.new(100_00)            ,
-        "100.37"          => Money.new(100_37)            ,
-        "100,37"          => Money.new(100_37)            ,
-        "100 000"         => Money.new(100_000_00)        ,
-        "100,000.00"      => Money.new(100_000_00)        ,
-        "1,000"           => Money.new(1_000_00)          ,
-        "-1,000"          => Money.new(-1_000_00)         ,
-        "1,000.5"         => Money.new(1_000_50)          ,
-        "1,000.51"        => Money.new(1_000_51)          ,
-        "1,000.505"       => Money.new(1_000_51)          ,
-        "1,000.504"       => Money.new(1_000_50)          ,
-        "1,000.0000"      => Money.new(1_000_00)          ,
-        "1,000.5000"      => Money.new(1_000_50)          ,
-        "1,000.5099"      => Money.new(1_000_51)          ,
-        "1.550"           => Money.new(1_55)              ,
-        "25."             => Money.new(25_00)             ,
-        ".75"             => Money.new(75)                ,
-
-        "100 USD"         => Money.new(100_00, "USD")     ,
-        "-100 USD"        => Money.new(-100_00, "USD")    ,
-        "100 EUR"         => Money.new(100_00, "EUR")     ,
-        "100.37 EUR"      => Money.new(100_37, "EUR")     ,
-        "100,37 EUR"      => Money.new(100_37, "EUR")     ,
-        "100,000.00 USD"  => Money.new(100_000_00, "USD") ,
-        "100.000,00 EUR"  => Money.new(100_000_00, "EUR") ,
-        "1,000 USD"       => Money.new(1_000_00, "USD")   ,
-        "-1,000 USD"      => Money.new(-1_000_00, "USD")  ,
-        "1,000.5500 USD"  => Money.new(1_000_55, "USD")   ,
-        "-1,000.6500 USD" => Money.new(-1_000_65, "USD")  ,
-        "1.550 USD"       => Money.new(1_55, "USD")       ,
-
-        "USD 100"         => Money.new(100_00, "USD")     ,
-        "EUR 100"         => Money.new(100_00, "EUR")     ,
-        "EUR 100.37"      => Money.new(100_37, "EUR")     ,
-        "CAD -100.37"     => Money.new(-100_37, "CAD")    ,
-        "EUR 100,37"      => Money.new(100_37, "EUR")     ,
-        "EUR -100,37"     => Money.new(-100_37, "EUR")    ,
-        "USD 100,000.00"  => Money.new(100_000_00, "USD") ,
-        "EUR 100.000,00"  => Money.new(100_000_00, "EUR") ,
-        "USD 1,000"       => Money.new(1_000_00, "USD")   ,
-        "USD -1,000"      => Money.new(-1_000_00, "USD")  ,
-        "USD 1,000.9000"  => Money.new(1_000_90, "USD")   ,
-        "USD -1,000.090"  => Money.new(-1_000_09, "USD")  ,
-        "USD 1.5500"      => Money.new(1_55, "USD")       ,
-
-        "$100 USD"        => Money.new(100_00, "USD")     ,
-        "$1,194.59 USD"   => Money.new(1_194_59, "USD")   ,
-        "$-1,955 USD"     => Money.new(-1_955_00, "USD")  ,
-        "$1,194.5900 USD" => Money.new(1_194_59, "USD")   ,
-        "$-1,955.000 USD" => Money.new(-1_955_00, "USD")  ,
-        "$1.99000 USD"    => Money.new(1_99, "USD")       ,
-      }
-
-      specify "it should work" do
-        StringToMoney.each do |string, money|
-          string.to_money.should == money
-        end
-      end
-
-      it "should coerce input to string" do
-        Money.parse(20, "USD").should == Money.new(20_00, "USD")
-      end
-
-      it "should accept optional currency" do
-        "10.10".to_money('USD').should == Money.new(1010, 'USD')
-        "10.10".to_money('EUR').should == Money.new(1010, 'EUR')
-        "10.10 USD".to_money('USD').should == Money.new(1010, 'USD')
-      end
-
-      it "should raise error if optional currency doesn't match string currency" do
-        lambda{ "10.10 USD".to_money('EUR') }.should raise_error(/Mismatching Currencies/)
-      end
-
-      it "should ignore unrecognized data" do
-        "hello 2000 world".to_money.should == Money.new(2000_00)
-      end
-
-      it "should respect :subunit_to_unit currency property" do
-        "1".to_money("USD").should == Money.new(1_00,  "USD")
-        "1".to_money("TND").should == Money.new(1_000, "TND")
-        "1".to_money("CLP").should == Money.new(1,     "CLP")
-        "1.5".to_money("KWD").cents.should == 1500
-      end
-    end
-
-    describe "#to_currency" do
-      it "should convert string to Currency" do
-        "USD".to_currency.should == Money::Currency.new(:usd)
-        "EUR".to_currency.should == Money::Currency.new(:eur)
-      end
-
-      it "should raise Money::Currency::UnknownCurrency with unknown Currency" do
-        lambda { "XXX".to_currency }.should raise_error(Money::Currency::UnknownCurrency)
-        lambda { " ".to_currency }.should raise_error(Money::Currency::UnknownCurrency)
-      end
-    end
-  end
-
-end
+require "spec_helper"
+
+describe "Money core extensions" do
+
+  describe Numeric do
+    describe "#to_money" do
+      it "should work" do
+        money = 1234.to_money
+        money.cents.should == 1234_00
+        money.currency.should == Money.default_currency
+
+        money = 100.37.to_money
+        money.cents.should == 100_37
+        money.currency.should == Money.default_currency
+
+        money = BigDecimal.new('1234').to_money
+        money.cents.should == 1234_00
+        money.currency.should == Money.default_currency
+      end
+
+      it "should accept optional currency" do
+        1234.to_money('USD').should == Money.new(123400, 'USD')
+        1234.to_money('EUR').should == Money.new(123400, 'EUR')
+      end
+
+      it "should respect :subunit_to_unit currency property" do
+        10.to_money('USD').should == Money.new(10_00, 'USD')
+        10.to_money('TND').should == Money.new(10_000, 'TND')
+        10.to_money('CLP').should == Money.new(10, 'CLP')
+      end
+
+      specify "#issue/15" do
+        amount = 555.55.to_money
+        amount.should == Money.new(55555)
+      end
+    end
+  end
+
+  describe String do
+    describe "#to_money" do
+
+      StringToMoney = {
+        "20.15"           => Money.new(20_15)             ,
+        "100"             => Money.new(100_00)            ,
+        "100.37"          => Money.new(100_37)            ,
+        "100,37"          => Money.new(100_37)            ,
+        "100 000"         => Money.new(100_000_00)        ,
+        "100,000.00"      => Money.new(100_000_00)        ,
+        "1,000"           => Money.new(1_000_00)          ,
+        "-1,000"          => Money.new(-1_000_00)         ,
+        "1,000.5"         => Money.new(1_000_50)          ,
+        "1,000.51"        => Money.new(1_000_51)          ,
+        "1,000.505"       => Money.new(1_000_51)          ,
+        "1,000.504"       => Money.new(1_000_50)          ,
+        "1,000.0000"      => Money.new(1_000_00)          ,
+        "1,000.5000"      => Money.new(1_000_50)          ,
+        "1,000.5099"      => Money.new(1_000_51)          ,
+        "1.550"           => Money.new(1_55)              ,
+        "25."             => Money.new(25_00)             ,
+        ".75"             => Money.new(75)                ,
+
+        "100 USD"         => Money.new(100_00, "USD")     ,
+        "-100 USD"        => Money.new(-100_00, "USD")    ,
+        "100 EUR"         => Money.new(100_00, "EUR")     ,
+        "100.37 EUR"      => Money.new(100_37, "EUR")     ,
+        "100,37 EUR"      => Money.new(100_37, "EUR")     ,
+        "100,000.00 USD"  => Money.new(100_000_00, "USD") ,
+        "100.000,00 EUR"  => Money.new(100_000_00, "EUR") ,
+        "1,000 USD"       => Money.new(1_000_00, "USD")   ,
+        "-1,000 USD"      => Money.new(-1_000_00, "USD")  ,
+        "1,000.5500 USD"  => Money.new(1_000_55, "USD")   ,
+        "-1,000.6500 USD" => Money.new(-1_000_65, "USD")  ,
+        "1.550 USD"       => Money.new(1_55, "USD")       ,
+
+        "USD 100"         => Money.new(100_00, "USD")     ,
+        "EUR 100"         => Money.new(100_00, "EUR")     ,
+        "EUR 100.37"      => Money.new(100_37, "EUR")     ,
+        "CAD -100.37"     => Money.new(-100_37, "CAD")    ,
+        "EUR 100,37"      => Money.new(100_37, "EUR")     ,
+        "EUR -100,37"     => Money.new(-100_37, "EUR")    ,
+        "USD 100,000.00"  => Money.new(100_000_00, "USD") ,
+        "EUR 100.000,00"  => Money.new(100_000_00, "EUR") ,
+        "USD 1,000"       => Money.new(1_000_00, "USD")   ,
+        "USD -1,000"      => Money.new(-1_000_00, "USD")  ,
+        "USD 1,000.9000"  => Money.new(1_000_90, "USD")   ,
+        "USD -1,000.090"  => Money.new(-1_000_09, "USD")  ,
+        "USD 1.5500"      => Money.new(1_55, "USD")       ,
+
+        "$100 USD"        => Money.new(100_00, "USD")     ,
+        "$1,194.59 USD"   => Money.new(1_194_59, "USD")   ,
+        "$-1,955 USD"     => Money.new(-1_955_00, "USD")  ,
+        "$1,194.5900 USD" => Money.new(1_194_59, "USD")   ,
+        "$-1,955.000 USD" => Money.new(-1_955_00, "USD")  ,
+        "$1.99000 USD"    => Money.new(1_99, "USD")       ,
+      }
+
+      specify "it should work" do
+        StringToMoney.each do |string, money|
+          string.to_money.should == money
+        end
+      end
+
+      it "should coerce input to string" do
+        Money.parse(20, "USD").should == Money.new(20_00, "USD")
+      end
+
+      it "should accept optional currency" do
+        "10.10".to_money('USD').should == Money.new(1010, 'USD')
+        "10.10".to_money('EUR').should == Money.new(1010, 'EUR')
+        "10.10 USD".to_money('USD').should == Money.new(1010, 'USD')
+      end
+
+      it "should raise error if optional currency doesn't match string currency" do
+        lambda{ "10.10 USD".to_money('EUR') }.should raise_error(/Mismatching Currencies/)
+      end
+
+      it "should ignore unrecognized data" do
+        "hello 2000 world".to_money.should == Money.new(2000_00)
+      end
+
+      it "should respect :subunit_to_unit currency property" do
+        "1".to_money("USD").should == Money.new(1_00,  "USD")
+        "1".to_money("TND").should == Money.new(1_000, "TND")
+        "1".to_money("CLP").should == Money.new(1,     "CLP")
+        "1.5".to_money("KWD").cents.should == 1500
+      end
+    end
+
+    describe "#to_currency" do
+      it "should convert string to Currency" do
+        "USD".to_currency.should == Money::Currency.new(:usd)
+        "EUR".to_currency.should == Money::Currency.new(:eur)
+      end
+
+      it "should raise Money::Currency::UnknownCurrency with unknown Currency" do
+        lambda { "XXX".to_currency }.should raise_error(Money::Currency::UnknownCurrency)
+        lambda { " ".to_currency }.should raise_error(Money::Currency::UnknownCurrency)
+      end
+    end
+  end
+
+  describe Symbol do
+    describe "#to_currency" do
+      it "should convert symbol to Currency" do
+        :usd.to_currency.should == Money::Currency.new(:usd)
+        :ars.to_currency.should == Money::Currency.new(:ars)
+      end
+      it "should work case-insensitive" do
+        :EUR.to_currency.should == Money::Currency.new(:eur)
+      end
+      it "should raise Money::Currency::UnknownCurrency with unknown Currency" do
+        lambda { :XXX.to_currency }.should raise_error(Money::Currency::UnknownCurrency)
+        lambda { :" ".to_currency }.should raise_error(Money::Currency::UnknownCurrency)
+      end
+    end
+  end
+
+end

data/spec/currency_spec.rb

@@ -1,128 +1,133 @@
-# encoding: utf-8
-
-require "spec_helper"
-
-describe Money::Currency do
-
-  specify "#initialize should lookup data from TABLE" do
-    with_custom_definitions do
-      Money::Currency::TABLE[:usd] = {:priority => 1, :iso_code => "USD", :name => "United States Dollar", :symbol => "$", :subunit => "Cent", :subunit_to_unit => 100, :decimal_mark => ".", :thousands_separator => ","}
-      Money::Currency::TABLE[:eur] = {:priority => 2, :iso_code => "EUR", :name => "Euro", :symbol => "€", :subunit => "Cent", :subunit_to_unit => 100, :decimal_mark => ".", :thousands_separator => ","}
-
-      currency = Money::Currency.new("USD")
-      currency.id.should        == :usd
-      currency.priority.should  == 1
-      currency.iso_code.should  == "USD"
-      currency.name.should      == "United States Dollar"
-      currency.decimal_mark.should == "."
-      currency.separator.should == "."
-      currency.thousands_separator.should == ","
-      currency.delimiter.should == ","
-    end
-  end
-
-  specify "#initialize should raise UnknownMoney::Currency with unknown currency" do
-    lambda { Money::Currency.new("xxx") }.should raise_error(Money::Currency::UnknownCurrency, /xxx/)
-  end
-
-  specify "#== should return true if self === other" do
-    currency = Money::Currency.new(:eur)
-    currency.should == currency
-  end
-
-  specify "#== should return true if the id is equal" do
-    Money::Currency.new(:eur).should     == Money::Currency.new(:eur)
-    Money::Currency.new(:eur).should_not == Money::Currency.new(:usd)
-  end
-
-  specify "#eql? should return true if #== returns true" do
-    Money::Currency.new(:eur).eql?(Money::Currency.new(:eur)).should be true
-    Money::Currency.new(:eur).eql?(Money::Currency.new(:usd)).should be false
-  end
-
-  specify "#hash should return the same value for equal objects" do
-    Money::Currency.new(:eur).hash.should == Money::Currency.new(:eur).hash
-    Money::Currency.new(:eur).hash.should_not == Money::Currency.new(:usd).hash
-  end
-
-  specify "#hash can be used to return the intersection of Currency object arrays" do
-    intersection = [Money::Currency.new(:eur), Money::Currency.new(:usd)] & [Money::Currency.new(:eur)]
-    intersection.should == [Money::Currency.new(:eur)]
-  end
-
-  specify "#<=> should compare objects by priority" do
-    Money::Currency.new(:cad).should > Money::Currency.new(:usd)
-    Money::Currency.new(:usd).should < Money::Currency.new(:eur)
-  end
-
-  specify "#to_s" do
-    Money::Currency.new(:usd).to_s.should == "USD"
-    Money::Currency.new(:eur).to_s.should == "EUR"
-  end
-
-  specify "#inspect" do
-    Money::Currency.new(:usd).inspect.should ==
-    %Q{#<Money::Currency id: usd, priority: 1, symbol_first: true, thousands_separator: ,, html_entity: $, decimal_mark: ., name: United States Dollar, symbol: $, subunit_to_unit: 100, iso_code: USD, subunit: Cent>}
-  end
-
-
-  specify "#self.find should return currency matching given id" do
-    with_custom_definitions do
-      Money::Currency::TABLE[:usd] = { :priority =>   1, :iso_code => "USD", :name => "United States Dollar",                      :symbol => "$",             :subunit => "Cent",          :subunit_to_unit => 100, :decimal_mark => ".", :thousands_separator => ","   }
-      Money::Currency::TABLE[:eur] = { :priority =>   2, :iso_code => "EUR", :name => "Euro",                                      :symbol => "€",             :subunit => "Cent",          :subunit_to_unit => 100, :decimal_mark => ".", :thousands_separator => ","   }
-
-      expected = Money::Currency.new(:eur)
-      Money::Currency.find(:eur).should  == expected
-      Money::Currency.find(:EUR).should  == expected
-      Money::Currency.find("eur").should == expected
-      Money::Currency.find("EUR").should == expected
-    end
-  end
-
-  specify "#self.find should return nil unless currency matching given id" do
-    with_custom_definitions do
-      Money::Currency::TABLE[:usd] = { :position =>   1, :iso_code => "USD", :name => "United States Dollar",                      :symbol => "$",             :subunit => "Cent",          :subunit_to_unit => 100, :decimal_mark => ".", :thousands_separator => ","   }
-      Money::Currency::TABLE[:eur] = { :position =>   2, :iso_code => "EUR", :name => "Euro",                                      :symbol => "€",             :subunit => "Cent",          :subunit_to_unit => 100, :decimal_mark => ".", :thousands_separator => ","   }
-
-      expected = Money::Currency.new(:eur)
-      Money::Currency.find(:eur).should  == expected
-      Money::Currency.find(:EUR).should  == expected
-      Money::Currency.find("eur").should == expected
-      Money::Currency.find("EUR").should == expected
-    end
-  end
-
-  specify "#self.wrap should return nil if object is nil" do
-    Money::Currency.wrap(nil).should == nil
-    Money::Currency.wrap(Money::Currency.new(:usd)).should == Money::Currency.new(:usd)
-    Money::Currency.wrap(:usd).should == Money::Currency.new(:usd)
-  end
-
-
-  def with_custom_definitions(&block)
-    begin
-      old = Money::Currency::TABLE.dup
-      Money::Currency::TABLE.clear
-      yield
-    ensure
-      silence_warnings do
-        Money::Currency.const_set("TABLE", old)
-      end
-    end
-  end
-
-  # Sets $VERBOSE to nil for the duration of the block and back to its original value afterwards.
-  #
-  #   silence_warnings do
-  #     value = noisy_call # no warning voiced
-  #   end
-  #
-  #   noisy_call # warning voiced
-  def silence_warnings
-    old_verbose, $VERBOSE = $VERBOSE, nil
-    yield
-  ensure
-    $VERBOSE = old_verbose
-  end
-
-end
+# encoding: utf-8
+
+require "spec_helper"
+
+describe Money::Currency do
+
+  specify "#initialize should lookup data from TABLE" do
+    with_custom_definitions do
+      Money::Currency::TABLE[:usd] = {:priority => 1, :iso_code => "USD", :name => "United States Dollar", :symbol => "$", :subunit => "Cent", :subunit_to_unit => 100, :decimal_mark => ".", :thousands_separator => ","}
+      Money::Currency::TABLE[:eur] = {:priority => 2, :iso_code => "EUR", :name => "Euro", :symbol => "€", :subunit => "Cent", :subunit_to_unit => 100, :decimal_mark => ".", :thousands_separator => ","}
+
+      currency = Money::Currency.new("USD")
+      currency.id.should        == :usd
+      currency.priority.should  == 1
+      currency.iso_code.should  == "USD"
+      currency.name.should      == "United States Dollar"
+      currency.decimal_mark.should == "."
+      currency.separator.should == "."
+      currency.thousands_separator.should == ","
+      currency.delimiter.should == ","
+    end
+  end
+
+  specify "#initialize should raise UnknownMoney::Currency with unknown currency" do
+    lambda { Money::Currency.new("xxx") }.should raise_error(Money::Currency::UnknownCurrency, /xxx/)
+  end
+
+  specify "#== should return true if self === other" do
+    currency = Money::Currency.new(:eur)
+    currency.should == currency
+  end
+
+  specify "#== should return true if the id is equal" do
+    Money::Currency.new(:eur).should     == Money::Currency.new(:eur)
+    Money::Currency.new(:eur).should_not == Money::Currency.new(:usd)
+  end
+
+  specify "#eql? should return true if #== returns true" do
+    Money::Currency.new(:eur).eql?(Money::Currency.new(:eur)).should be true
+    Money::Currency.new(:eur).eql?(Money::Currency.new(:usd)).should be false
+  end
+
+  specify "#hash should return the same value for equal objects" do
+    Money::Currency.new(:eur).hash.should == Money::Currency.new(:eur).hash
+    Money::Currency.new(:eur).hash.should_not == Money::Currency.new(:usd).hash
+  end
+
+  specify "#hash can be used to return the intersection of Currency object arrays" do
+    intersection = [Money::Currency.new(:eur), Money::Currency.new(:usd)] & [Money::Currency.new(:eur)]
+    intersection.should == [Money::Currency.new(:eur)]
+  end
+
+  specify "#<=> should compare objects by priority" do
+    Money::Currency.new(:cad).should > Money::Currency.new(:usd)
+    Money::Currency.new(:usd).should < Money::Currency.new(:eur)
+  end
+
+  specify "#to_s" do
+    Money::Currency.new(:usd).to_s.should == "USD"
+    Money::Currency.new(:eur).to_s.should == "EUR"
+  end
+
+  specify "#to_currency" do
+    usd = Money::Currency.new(:usd)
+    usd.to_currency.should == usd
+  end
+
+  specify "#inspect" do
+    Money::Currency.new(:usd).inspect.should ==
+    %Q{#<Money::Currency id: usd, priority: 1, symbol_first: true, thousands_separator: ,, html_entity: $, decimal_mark: ., name: United States Dollar, symbol: $, subunit_to_unit: 100, iso_code: USD, subunit: Cent>}
+  end
+
+
+  specify "#self.find should return currency matching given id" do
+    with_custom_definitions do
+      Money::Currency::TABLE[:usd] = { :priority =>   1, :iso_code => "USD", :name => "United States Dollar",                      :symbol => "$",             :subunit => "Cent",          :subunit_to_unit => 100, :decimal_mark => ".", :thousands_separator => ","   }
+      Money::Currency::TABLE[:eur] = { :priority =>   2, :iso_code => "EUR", :name => "Euro",                                      :symbol => "€",             :subunit => "Cent",          :subunit_to_unit => 100, :decimal_mark => ".", :thousands_separator => ","   }
+
+      expected = Money::Currency.new(:eur)
+      Money::Currency.find(:eur).should  == expected
+      Money::Currency.find(:EUR).should  == expected
+      Money::Currency.find("eur").should == expected
+      Money::Currency.find("EUR").should == expected
+    end
+  end
+
+  specify "#self.find should return nil unless currency matching given id" do
+    with_custom_definitions do
+      Money::Currency::TABLE[:usd] = { :position =>   1, :iso_code => "USD", :name => "United States Dollar",                      :symbol => "$",             :subunit => "Cent",          :subunit_to_unit => 100, :decimal_mark => ".", :thousands_separator => ","   }
+      Money::Currency::TABLE[:eur] = { :position =>   2, :iso_code => "EUR", :name => "Euro",                                      :symbol => "€",             :subunit => "Cent",          :subunit_to_unit => 100, :decimal_mark => ".", :thousands_separator => ","   }
+
+      expected = Money::Currency.new(:eur)
+      Money::Currency.find(:eur).should  == expected
+      Money::Currency.find(:EUR).should  == expected
+      Money::Currency.find("eur").should == expected
+      Money::Currency.find("EUR").should == expected
+    end
+  end
+
+  specify "#self.wrap should return nil if object is nil" do
+    Money::Currency.wrap(nil).should == nil
+    Money::Currency.wrap(Money::Currency.new(:usd)).should == Money::Currency.new(:usd)
+    Money::Currency.wrap(:usd).should == Money::Currency.new(:usd)
+  end
+
+
+  def with_custom_definitions(&block)
+    begin
+      old = Money::Currency::TABLE.dup
+      Money::Currency::TABLE.clear
+      yield
+    ensure
+      silence_warnings do
+        Money::Currency.const_set("TABLE", old)
+      end
+    end
+  end
+
+  # Sets $VERBOSE to nil for the duration of the block and back to its original value afterwards.
+  #
+  #   silence_warnings do
+  #     value = noisy_call # no warning voiced
+  #   end
+  #
+  #   noisy_call # warning voiced
+  def silence_warnings
+    old_verbose, $VERBOSE = $VERBOSE, nil
+    yield
+  ensure
+    $VERBOSE = old_verbose
+  end
+
+end