The attached patch fixes the problem and has been applied upstream to the unstable version of Interchange.

Regards
        Racke

--
LinuXia Systems => http://www.linuxia.de/
Expert Interchange Consulting and System Administration
ICDEVGROUP => http://www.icdevgroup.org/
Interchange Development Team

diff -u -r2.209 -r2.210
--- interchange/lib/Vend/Config.pm	19 Nov 2006 20:59:56 -0000	2.209
+++ interchange/lib/Vend/Config.pm	21 Nov 2006 22:32:12 -0000	2.210
@@ -3438,6 +3438,16 @@
 							}
 						}
 
+						# create currency repositories
+						for my $locale (keys %{$C->{Locale_repository}}) {
+							for my $key (@Locale_keys_currency) {
+								if ($C->{Locale_repository}->{$locale}->{$key}) {
+									$C->{Currency_repository}->{$locale}->{$key}
+										= $C->{Locale_repository}->{$locale}->{$key};
+								}
+							}
+						}
+						
 						push @Dispatches, 'Locale';
 						return 1;
 					},
diff -u -r2.100 -r2.101
--- interchange/lib/Vend/Util.pm	15 Nov 2006 15:49:17 -0000	2.100
+++ interchange/lib/Vend/Util.pm	21 Nov 2006 22:32:12 -0000	2.101
@@ -417,7 +417,7 @@
     }
 
     if ($currency) {
-        my $curr = $Vend::Cfg->{Locale_repository}{$currency};
+        my $curr = $Vend::Cfg->{Currency_repository}{$currency};
 
         for(@Vend::Config::Locale_directives_currency) {
             $Vend::Cfg->{$_} = $curr->{$_}

Reply via email to