Mercurial > pub > Impl
comparison Lib/IMPL/Resources.pm @ 319:d485467eca92
small fixes
author | cin |
---|---|
date | Wed, 15 May 2013 02:00:42 +0400 |
parents | 1838bdb4d238 |
children | 39842eedd923 |
comparison
equal
deleted
inserted
replaced
318:1838bdb4d238 | 319:d485467eca92 |
---|---|
1 package IMPL::Resources; | 1 package IMPL::Resources; |
2 use strict; | 2 use strict; |
3 | 3 |
4 our $CurrentLocale ||= 'default'; | 4 our $CurrentLocale ||= 'default'; |
5 | 5 |
6 sub CurrentLocale { | 6 sub currentLocale { |
7 $CurrentLocale; | 7 $CurrentLocale; |
8 } | 8 } |
9 | 9 |
10 sub SetLocale { | 10 sub SetLocale { |
11 my ($self,$locale) = @_; | 11 my ($self,$locale) = @_; |