Hi

Just an addition
In the code that below is lifted from, I save a ref to the created 
Wx::Locale object.

I'm not sure if this is required for it to work.

Regards

Mark

On 04/02/2011 15:56, Mark Dootson wrote:
> Hi,
>
> I took a look at the locale code, and assuming that what is required is
> to load the language translations, I don't think you should be setting
> the Locale to en_GB by default.
>
> The following code allows you to save .mo catalogs with names such as
>
> en_GB.mo
> en_US.mo
>
>
> code will load the most appropriate catalogs if they exist.
> No need at all to change the locale of the user. If message catalogs for
> user's locale are available, they'll get translations. If not, they'll
> get the strings in 'en'. Of course, you don't actually need a catalog
> for 'en' if that's what you decide represents the locale for the strings
> in the source code.
>
> Hope this helps.
>
> #---------------------------------------------------------------------
>
> # Suggested alternate way to load language files for Padre
>
> my $langid = Wx::Locale::GetSystemLanguage;
> my $locale = Wx::Locale->new($langid);
>
> # add lookup prefixes
> my $catpathprefix = 'path to where the mo files are';
> $locale->AddCatalogLookupPathPrefix( $catpathprefix );
>
> # add catalogs in order
> my($shortfile, $longfile);
>
> my $langname = $locale->GetCanonicalName(); # en_GB, en_US etc.
>
> my $shortname = ( $langname ) ? substr($langname,0,2) : 'en';
>
> my $filename = qq($catpathprefix/$shortname.mo);
> $shortfile = 1 if -f $filename;
>
> if($shortfile) {
>       my $result = $locale->AddCatalog( $shortname ) ;
>       warn (gettext('Unable to load language for locale') . ' %s',
> $shortname) if !$result;
> }
>
> $filename = qq($catpathprefix/$langname.mo);
>
> $longfile = 1 if -f $filename;
> if( ($longfile)&&  ( $shortname ne $langname) ) {
>       my $result = $locale->AddCatalog( $langname );
>       warn(gettext('Unable to load language for locale') . ' %s',
> $langname) if !$result;
> }
>
> #----------------------------------------------------------------------
>
>
>
>
> On 04/02/2011 15:17, Oren Maurer wrote:
>> Gabor ad all
>> Hi
>>
>> Sorry for replying only now.
>>
>> Here is what I get when doing 'locale':
>>
>> --->>>
>> [meorero@meorero-arch05 ~]$ locale
>> LANG=en_US.UTF-8
>> LC_CTYPE="en_US.UTF-8"
>> LC_NUMERIC="en_US.UTF-8"
>> LC_TIME="en_US.UTF-8"
>> LC_COLLATE="en_US.UTF-8"
>> LC_MONETARY="en_US.UTF-8"
>> LC_MESSAGES="en_US.UTF-8"
>> LC_PAPER="en_US.UTF-8"
>> LC_NAME="en_US.UTF-8"
>> LC_ADDRESS="en_US.UTF-8"
>> LC_TELEPHONE="en_US.UTF-8"
>> LC_MEASUREMENT="en_US.UTF-8"
>> LC_IDENTIFICATION="en_US.UTF-8"
>> LC_ALL=en_US.UTF-8
>> [meorero@meorero-arch05 ~]$
>> <<<---
>>
>> On Sun, Jan 30, 2011 at 6:19 PM, Gabor Szabo<szab...@gmail.com
>> <mailto:szab...@gmail.com>>  wrote:
>>
>>      On Sat, Jan 22, 2011 at 6:08 PM, Oren Maurer<meor...@gmail.com
>>      <mailto:meor...@gmail.com>>  wrote:
>>       >  Hi.
>>       >  I have succeeded to get Padre (the las version, 0.78) on Arch Linux.
>>       >  On Arch Linux - Padre is part  of AUR (Arch User Repository).
>>       >  But I installed by CPAN, because compiling (of WX) and installing
>>      from the
>>       >  AUR package failed.
>>       >  Maybe I will investigate it some time...
>>       >  Anyway - now, when I type 'padre' on my X terminal, Padre comes
>>      up , but I
>>       >  get also this:
>>       >  [meorero@meorero-arch05 ~]$ padre
>>       >  05:45:14 PM: Error: Cannot set locale to 'en_GB'.
>>       >  [meorero@meorero-arch05 ~]$
>>       >  Do you know why, and what shall I do?
>>       >
>>
>>      what do you get when you type the following?
>>
>>      $ locale
>>
>>
>>      Gabor
>>      _______________________________________________
>>      Padre-dev mailing list
>>      Padre-dev@perlide.org<mailto:Padre-dev@perlide.org>
>>      http://mail.perlide.org/mailman/listinfo/padre-dev
>>
>>
>>
>>
>> --
>> ________________________________
>> Oren  Maurer
>> http://oren.maurer.org.il
>> http://meorero.wordpress.com
>>    _______________________________
>>    #  =======================|
>>    #  Please avoid sending me Word |
>>    #   or PowerPoint attachments      |
>>    #  =======================|
>>    # See: http://www.gnu.org/philosophy/no-word-attachments.html
>>
>>
>>
>> _______________________________________________
>> Padre-dev mailing list
>> Padre-dev@perlide.org
>> http://mail.perlide.org/mailman/listinfo/padre-dev
>
> _______________________________________________
> Padre-dev mailing list
> Padre-dev@perlide.org
> http://mail.perlide.org/mailman/listinfo/padre-dev

_______________________________________________
Padre-dev mailing list
Padre-dev@perlide.org
http://mail.perlide.org/mailman/listinfo/padre-dev

Reply via email to