2009/9/8 Lucio Chiappetti <[email protected]>:
> I was baffled by the fact you used backquotes `` instead of ''. The former
> freeze everything.
Quoting is everything.
> I am not fully there yet. What I wanted were two triplets of commands.
>
> Shift-F1/F2/F3 should CREATE a new "pseudocursor" of a given shape.
> Unshifted F1/F2/F3 should CHANGE the shape of the pseudocursor under the
> mouse.
Right -- so basically absolutely nothing to do with what you
originally posted then.
> I thought to define a base style, three variants (LaserA/B/C) associated to
> the three icons, and a "current/default" style
>
> Style LaserBase StickyIcon, StickyAcrossDesks, Layer 9, !IconTitle,
> IconBox none, PositionPlacement UnderMouse
>
> Style LaserA Icon beam.png , UseStyle LaserBase
> Style LaserB Icon circle.png, UseStyle LaserBase
> Style LaserC Icon ellipse.png , UseStyle LaserBase
>
> Style Laser UseStyle LaserA
>
> The creation function will imply the initial style via the -name
>
> DestroyFunc PointLaser
> AddToFunc PointLaser
> + I Exec xterm -name Laser$0 -iconic
Assuming you only launch your Laser$0 windows in this way, this is
fine, else use FvwmEvent to do the iconification on add_window in case
you start PoinLaser via a script or something.
> DestroyFunc rePointLaser
> AddToFunc rePointLaser
> + I ThisWindow ("Laser*") Move m-$[xof]p m-$[yof]p
> + I ThisWindow ("Laser*") Style Laser Icon $[ik].png
No -- use WindowStyle here.
+ I ThisWindow (Laser*) WindowStyle Icon $[ik].png
> PointerKey (Laser*) F4 I N Style Laser Icon circle.png
> PointerKey (Laser*) F5 I N Style Laser Icon ellipse.png
> PointerKey (Laser*) F6 I N Style Laser Icon beam.png
No, use WindowStyle here (see above.)
-- Thomas Adam
