Input-model

Hi,

Using the input-model of a output-pane, I would like to make distinction
between pressed modifier-keys directly inside my callback method (with API
on the system I run).

But if I do simply this :

:input-model Œ(((:button-1 :press) mouse-press-callback))

the callback isn't called when Shift, Control or Meta are pressed.

Then I¹ve to do this :

:input-model  Œ(((:button-1 :press) mouse-press-callback)
                ((:button-1 :press :shift) mouse-press-callback)
                ((:button-1 :press :control) mouse-press-callback)
                ((:button-1 :press :meta) mouse-press-callback))

four lines of code (without the possible combinations) for each action type

I¹m looking for a better solution witch result in something like :

:input-model Œ(((:button-1 :press (or :none :shift :control :meta))
mouse-press-callback)

witch is not allowed... but maybe something else ?

Thanks for any idea !

Denis

----------------------------------------------------
Denis Pousseur
6 clos du Drossart
1180 Bruxelles, Belgique

Mail :  denis.pousseur@compositeurs.be
Website : http://compositeurs.be
----------------------------------------------------