Here you go. As it is, it assumes you have `xrsh' from X contrib
(I guess the old `xon' would be good enough in many cases) and
that you are parsing your .fvwm2rc with `m4'. If you're not
using `m4' and you don't want to, then just replace "HOSTMAP" by
its definition everywhere.... The `m4' parsing would be
completely unnecessary here, if $(name) worked as documented. :-(
Enjoy and do send me any improvements you make.
Jens
ps Of course you have to bind the form to something, right? I
have it on mouse-3:
Mouse 3 R A Module FvwmForm Xrsh
---- Start of included text -----------------------8<--- cut here -------------
*XrshWarpPointer
*XrshFont *helvetica*m*r*n*14*
*XrshButtonFont *helvetica*m*o*n*14*
*XrshInputFont *cour*m*r*n*14*
*XrshFore Black
*XrshBack Light Gray
*XrshItemFore Wheat
*XrshItemBack Gray50
# begin items
*XrshLine center
*XrshText "xrsh on remote host"
*XrshLine expand
#*XrshText "Host:"
*XrshSelection Host single
*XrshChoice clove clove on "clove"
*XrshChoice cumin cumin off "cumin"
*XrshChoice local local off "localhost"
*XrshChoice parsley parsley off "parsley"
*XrshChoice ginger ginger off "ginger"
*XrshChoice pepper pepper off "pepper"
*XrshLine expand
*XrshButton quit "emacs" e
define(HOSTMAP,`$(clove?clove)$(cumin?cumin)$(parsley?parsley)$(ginger?ginger)$(pepper?pepper)')
*XrshCommand Exec $(local!xrsh HOSTMAP) emacs
*XrshButton quit "mule" m
*XrshCommand Exec $(local!xrsh HOSTMAP) mule
*XrshButton quit "xterm" x
*XrshCommand Exec $(local!xrsh HOSTMAP) xterm -ls -sb -sl 200 -j -fn a14
*XrshButton quit "netscape" n
*XrshCommand Exec $(local!xrsh HOSTMAP) netscape -install
*XrshButton quit "Cancel" ^[
# *XrshCommand Nop
*XrshCommand Next [Xrsh] Iconify
*XrshButton quit "Quit X" L
*XrshCommand Module FvwmForm QuitVerify
---- End of included text -------------------------8<--- and here -------------
--
Visit the official FVWM web page at <URL:http://www.hpc.uh.edu/fvwm/>.
To unsubscribe from the list, send "unsubscribe fvwm" in the body of a
message to majordomo_at_hpc.uh.edu.
To report problems, send mail to fvwm-owner_at_hpc.uh.edu.
Received on Wed May 01 1996 - 04:04:04 BST