DestroyModuleConfig         FormFvwmRlogin.*
*FormFvwmRlogin.WarpPointer
*FormFvwmRlogin.Line         center
*FormFvwmRlogin.Text         "Login to Remote Host"
*FormFvwmRlogin.Line         center
*FormFvwmRlogin.Text         "Host:"
*FormFvwmRlogin.Input        HostName        20      ""
*FormFvwmRlogin.Line         center
*FormFvwmRlogin.Selection    UserSel single
*FormFvwmRlogin.Choice       Default Default on      "same user"
*FormFvwmRlogin.Choice       Custom  Custom  off     "user:"
*FormFvwmRlogin.Input        UserName        10      ""
*FormFvwmRlogin.Line         expand
*FormFvwmRlogin.Button       quit    "Login"         ^M
*FormFvwmRlogin.Command      Exec exec rsh $(Custom?-l $(UserName)) $(HostName) xterm -T xterm@$(HostName) -display $HOSTDISPLAY &
# Before saving the data, remove any previously saved data:
*FormFvwmRlogin.Command DestroyModuleConfig FvwmRloginDefault*
# The "Login" button causes a login and a saving of the current data:
*FormFvwmRlogin.Command !/bin/echo "# This file last created by\
 FormFvwmRlogin on: `/bin/date`.\n\
*FvwmRloginDefaultHostName $(HostName)\n\
*FvwmRloginDefaultUserName $(UserName)\n\
*FvwmRloginDefaultDefault $(Default?on)\n\
*FvwmRloginDefaultCustom $(Custom?on)"\
  > ${FVWM_USERHOME}/.FvwmRlogin
*FormFvwmRlogin.Button       restart "Clear"
*FormFvwmRlogin.Button       quit    "Cancel"        ^[
*FormFvwmRlogin.Command      Nop
# Tell FvwmForm to read vars from the .FvwmRlogin file:
*FormFvwmRlogin.UseData .FvwmRlogin *FvwmRloginDefault
