Listing 3. xlogin-buttons Script

#!/usr/bin/wish
# Two buttons, to reboot or halt the system
button .r -text "Reboot" -command\
    "exec /sbin/reboot"
button .h -text " Halt " -command\
     "exec
/sbin/halt"
# place them side by side
grid .r -column 0 -row 0
grid .h -column 1 -row 0
# placement of buttons on screen; modify
# accordingly
wm geometry . +256+408