<html><body bgcolor="#FFFFFF"><div>Hi Duncan,</div><div><br></div><div>You should use Plugin here:</div><div><a href="http://search.cpan.org/dist/Catalyst-Plugin-I18N/lib/Catalyst/Plugin/I18N.pm">http://search.cpan.org/dist/Catalyst-Plugin-I18N/lib/Catalyst/Plugin/I18N.pm</a></div><div><br></div><div>Check at <span class="Apple-style-span" style="-webkit-tap-highlight-color: rgba(26, 26, 26, 0.292969); -webkit-composition-fill-color: rgba(175, 192, 227, 0.230469); -webkit-composition-frame-color: rgba(77, 128, 180, 0.230469); ">configuration section if you want to specify </span><span class="Apple-style-span" style="-webkit-tap-highlight-color: rgba(26, 26, 26, 0.296875); -webkit-composition-fill-color: rgba(175, 192, 227, 0.230469); -webkit-composition-frame-color: rgba(77, 128, 180, 0.230469); "><span class="Apple-style-span" style="-webkit-tap-highlight-color: rgba(26, 26, 26, 0.292969); -webkit-composition-fill-color: rgba(175, 192, 227, 0.230469); -webkit-composition-frame-color: rgba(77, 128, 180, 0.230469); ">directory for </span><span class="Apple-style-span" style="-webkit-tap-highlight-color: rgba(26, 26, 26, 0.296875); -webkit-composition-fill-color: rgba(175, 192, 227, 0.230469); -webkit-composition-frame-color: rgba(77, 128, 180, 0.230469); ">.po files or elsr.</span></span></div><div><br>Regards,<div>Chakkit</div></div><div><br>On Oct 6, 2011, at 7:39 PM, Duncan Garland <<a href="mailto:Duncan.Garland@motortrak.com">Duncan.Garland@motortrak.com</a>> wrote:<br><br></div><div></div><blockquote type="cite"><div><div class="WordSection1"><p class="MsoNormal">Hi,<o:p></o:p></p><p class="MsoNormal"><o:p> </o:p></p><p class="MsoNormal">Has any anybody got a working example of the use of Locale::Maketext with Locale::Maketext::Lexicon? I think I’ve missed something simple. My example code is:<o:p></o:p></p><p class="MsoNormal"><o:p> </o:p></p><p class="MsoNormal">{ package Lexicon;<o:p></o:p></p><p class="MsoNormal"><o:p> </o:p></p><p class="MsoNormal"> use base 'Locale::Maketext';<o:p></o:p></p><p class="MsoNormal"> use Locale::Maketext::Lexicon {<o:p></o:p></p><p class="MsoNormal"> fr => ['Gettext' => "hello_fr2.po" ],<o:p></o:p></p><p class="MsoNormal"> };<o:p></o:p></p><p class="MsoNormal"><o:p> </o:p></p><p class="MsoNormal"> sub fr::xxx { print "Hello!"; return "hello"; }<o:p></o:p></p><p class="MsoNormal"><o:p> </o:p></p><p class="MsoNormal"> 1;<o:p></o:p></p><p class="MsoNormal"><o:p> </o:p></p><p class="MsoNormal">}<o:p></o:p></p><p class="MsoNormal"><o:p> </o:p></p><p class="MsoNormal">my $l = Lexicon->get_handle( 'fr' );<o:p></o:p></p><p class="MsoNormal"><o:p> </o:p></p><p class="MsoNormal">print $l->maketext( "Hello" ) . "\n";<o:p></o:p></p><p class="MsoNormal"><o:p> </o:p></p><p class="MsoNormal">print $l->maketext( "Nuts ~[xxx~]" ) . "\n";<o:p></o:p></p><p class="MsoNormal"><o:p> </o:p></p><p class="MsoNormal">The hello_fr2.po contains:<o:p></o:p></p><p class="MsoNormal"><o:p> </o:p></p><p class="MsoNormal">msgid "Hello"<o:p></o:p></p><p class="MsoNormal">msgstr "Bonjour"<o:p></o:p></p><p class="MsoNormal"><o:p> </o:p></p><p class="MsoNormal">msgid "Goodbye"<o:p></o:p></p><p class="MsoNormal">msgstr "Au revoir"<o:p></o:p></p><p class="MsoNormal"><o:p> </o:p></p><p class="MsoNormal">msgid "Your search matched [quant,_1,book]"<o:p></o:p></p><p class="MsoNormal">msgstr "Vous trouvez [ quant, _1, livre ]"<o:p></o:p></p><p class="MsoNormal"><o:p> </o:p></p><p class="MsoNormal">msgid "You are my [ord,_1] something."<o:p></o:p></p><p class="MsoNormal"><o:p> </o:p></p><p class="MsoNormal">msgid "[numf,_1]"<o:p></o:p></p><p class="MsoNormal">msgstr "[numf,_1]"<o:p></o:p></p><p class="MsoNormal"><o:p> </o:p></p><p class="MsoNormal">msgid "Nuts [xxx]"<o:p></o:p></p><p class="MsoNormal">msgstr "Bolts [xxx]"<o:p></o:p></p><p class="MsoNormal"><o:p> </o:p></p><p class="MsoNormal">The output is:<o:p></o:p></p><p class="MsoNormal"><o:p> </o:p></p><p class="MsoNormal">Bonjour<o:p></o:p></p><p class="MsoNormal">Bolts [xxx]<o:p></o:p></p><p class="MsoNormal"><o:p> </o:p></p><p class="MsoNormal">So the simple substitutions work but I can’t get it to call the function. Furthermore, it puts tilde before each bracket, so I can’t get a match for anything with a function unless I put tildes in there. I’ve missed something simple. Any ideas?<o:p></o:p></p><p class="MsoNormal"><o:p> </o:p></p><p class="MsoNormal">Thanks<o:p></o:p></p><p class="MsoNormal"><o:p> </o:p></p><p class="MsoNormal">Duncan<o:p></o:p></p><p class="MsoNormal"><o:p> </o:p></p><p class="MsoNormal"><o:p> </o:p></p></div></div></blockquote><blockquote type="cite"><div><span>_______________________________________________</span><br><span>List: <a href="mailto:Catalyst@lists.scsys.co.uk"><a href="mailto:Catalyst@lists.scsys.co.uk">Catalyst@lists.scsys.co.uk</a></a></span><br><span>Listinfo: <a href="http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/catalyst"><a href="http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/catalyst">http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/catalyst</a></a></span><br><span>Searchable archive: <a href="http://www.mail-archive.com/catalyst@lists.scsys.co.uk/"><a href="http://www.mail-archive.com/catalyst@lists.scsys.co.uk/">http://www.mail-archive.com/catalyst@lists.scsys.co.uk/</a></a></span><br><span>Dev site: <a href="http://dev.catalyst.perl.org/"><a href="http://dev.catalyst.perl.org/">http://dev.catalyst.perl.org/</a></a></span><br></div></blockquote></body></html>