Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked
 
PerlMonks  

Re: perlTk Type Tutor - useful for learning a DVORAK keyboard layout

by JaWi (Hermit)
on Jan 26, 2003 at 12:17 UTC ( #229962=note: print w/replies, xml ) Need Help??


in reply to perlTk Type Tutor - useful for learning a DVORAK keyboard layout

First, PodMaster++!

Second, the switching of the keyboard didn't work because your SwitchLayout function takes a HoH as argument, while your menu-commands only supplies a single hash. It works like a charm if you would change lines 305/306 to:

$f->command(-label=>'QWERTY', -command=>[\&SwitchLayout, $a=>\%QWERTY] +); $f->command(-label=>'DVORAK', -command => [\&SwitchLayout, $a=>\%DVORA +K]);
(Yes, I misabused the global $a for this purpose ;-)

Hope it helps,

-- JaWi

"A chicken is an egg's way of producing more eggs."

Replies are listed 'Best First'.
Re: Re: perlTk Type Tutor - useful for learning a DVORAK keyboard layout
by PodMaster (Abbot) on Jan 26, 2003 at 13:46 UTC
    Thanks.

    I guess I was thinking $f (the ~Layout menu) would be the first thing passed ~ anyway, I've updated the original post and fixed sub SwitchLayout, and all the calls to it ;)(no dumb 2arg blah)

    Now I can work on some kind of prompting wizard type dealie (now type 'A', and 'A' would light up)


    MJD says you can't just make shit up and expect the computer to know what you mean, retardo!
    ** The Third rule of perl club is a statement of fact: pod is sexy.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://229962]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (2)
As of 2022-08-17 16:39 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?