Re^7: Is there a way to make Prima widgets accept double byte characters?

Seems like a bug, or at least as an unintended use . Will try to fix, watch github for changes. Meanwhile, would that help you?

#!/usr/bin/perl --
use strict;
use warnings;

Main( @ARGV );
exit( 0 );

sub Main {
    ShowPrima();
    ShowPrima();
}
sub ShowPrima {
    require Prima ;
    require Prima::Buttons;
    require Prima::Application;
    $::application ||= Prima::Application-> create( qw' name Prima ');
+    
    my $mw = Prima::MainWindow->create(
        text     => 'Hello world!',
        size     => [ 200, 200],
    );
    $mw-> insert( Button =>
        centered => 1,
        text     => 'Hello world!',
        onClick  => sub { $mw-> cancel },
    );
    $mw-> execute;
}
[download]

Comment on Re^7: Is there a way to make Prima widgets accept double byte characters? Download Code

Replies are listed 'Best First'.
Re^8: Is there a way to make Prima widgets accept double byte characters? by Anonymous Monk on Jun 09, 2011 at 10:01 UTC
Meanwhile, would that help you? Why yes it would, thank you very much :)	[reply]
Re^9: Is there a way to make Prima widgets accept double byte characters? by dk (Chaplain) on Jun 09, 2011 at 12:50 UTC
fixed	[reply]
Re^10: Is there a way to make Prima widgets accept double byte characters? by Anonymous Monk on Jun 10, 2011 at 06:46 UTC
I forgot to post this "patch" for Prima/Makefile.PL, because Prima::codecs::win32 ends up at unexpected place sub setup_codecs { # see if Prima::codecs:: is installed my ( $prereq, $have_binary_prereq); $prereq = 'win32' if $Win32 and not $cygwin; $prereq = 'win64' if $Win64 and not $cygwin; $prereq = 'os2' if $OS2; if ( $prereq) { print "Checking for Prima::codecs::$prereq... "; eval "use Prima::codecs::$prereq;"; unless ( $@) { print "yes\n"; $have_binary_prereq++; push @LIBPATH, qd("$Config{installsitearch}/Prima/codecs/$ +prereq/lib"); push @INCPATH, qd("$Config{installsitearch}/Prima/codecs/$ +prereq/include"); if( $prereq =~ /win32/ ){ my $f = $INC{'Prima/codecs/win32.pm'}; $f =~ s/.pm$//; #~ push @LIBPATH, qd("$f/lib"); #~ push @INCPATH, qd("$f/include"); $LIBPATH[-1]=qd("$f/lib"); $INCPATH[-1]=qd("$f/include"); print "$_\n" for $f,@LIBPATH, @INCPATH ; } } else { print "no\n"; } } [download] FWIW, Prima::codecs::win32, should have two class methods, INCPATH and LIBPATH which return the correct path	[reply] [d/l]
Re^11: Is there a way to make Prima widgets accept double byte characters? by dk (Chaplain) on Jun 10, 2011 at 07:50 UTC
Re^12: Is there a way to make Prima widgets accept double byte characters? by Anonymous Monk on Aug 13, 2011 at 16:32 UTC


"be consistent"
	PerlMonks