Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

Re: Tcl::pTk right-click macOS

by chrstphrchvz (Scribe)
on Jul 20, 2018 at 02:31 UTC ( #1218863=note: print w/replies, xml ) Need Help??


in reply to Tcl::pTk right-click macOS

Howdy, this is indeed inherited from Tcl/Tk as the OP discovered. I wish I found this earlier, since this was a known issue I reported a few months ago (cf. RT #125050).

I was recently added as a co-maintainer to Tcl::pTk, and have released Tcl::pTk 0.93; one of the things it includes is if it detects macOS aqua, any widget events normally binding to buttons 2 or 3 will bind with the opposite one instead. Note that if your program has its own bind events (i.e. not already provided by a widget) it will still need its own workaround; I will try mentioning this in the Tcl::pTk documentation. The following expression for right-click will evaluate to '<3>' on X11 and Windows, and '<2>' on macOS aqua:

$widget->windowingsystem ne 'aqua' ? '<3>' : '<2>'

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (3)
As of 2022-09-25 17:06 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    I prefer my indexes to start at:




    Results (116 votes). Check out past polls.

    Notices?