2009/9/8 Lucio Chiappetti <lu...@lambrate.inaf.it>:
> 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

Reply via email to