# ~/.tkgoodstuffrc for use with xpmwish4.0 or other xpm-capable interpreter
# parameters and resources for tkgoodstuff and clients

set TKG_border	     4
set iconsonly 1

# CLOCK is also where you click for the tkgoodstuff popup menu.
Client Clock
# Jots won't add a window, but is invoked by clicking mouse button 3
# on the clock
Client Jots
  
# NET (PPP or SLIP network status indicator and toggler).  Useful but
# probably requires some fiddling for your setup (I have no root
# password on my home machine, so su -c give me root status for any
# command; I need to run ppp-on as root.)
Client Net
set Net_on Dialer
#set Net_on       "su -c ppp-on"
set Net_off      "su -c ppp-off"
#here's what I use:
#set Net_on       "/home/markcrim/TKGsrc/Dialer /home/markcrim/.DialSettings Dial"
set netup_image $images/netup.xpm
set netwt_image $images/netwt.xpm
set netdn_image $images/netdn.xpm

# BIFF (new mail flag, new message scanner, and mail program launcher)
Client Biff

########################################################################
# POPIMAP (for periodic fetching of mail from remote POP or IMAP
# server.  No window of its own; requires Biff.
# (uncomment to use)
 #Client PopImap 
 #set PopImap_host merv.philosophy.lsa.umich.edu
 #set PopImap_fetch_command get-remote-mailbox
 # #Note: get-remote-mailbox is my script to invoke a version of imapcopy
 # #(a util from ftp.cac.washington.edu) that I modified to copy without
 # #deleting to the named local mailbox (in my case my spool file) only
 # #those messages in the remote mailbox not marked "Seen", and then
 # #marking the copied messages on the server "Seen".  Source or linux
 # #binary available on request.
 #set PopImap_password mypassword 
 #set PopImap_command "echo -e \"$PopImap_user\\n$PopImap_password\" \
 #   | imapcopy \{$PopImap_host\}INBOX "
 #set PopImap_fetch_command {fetch-mailbox.sh}

#########################################################################
# Telnet button
#
AddButton Merv -imagefile $images/telnet.xpm -text "Telnet" -unixcmd { rxvt -T Merv -e telnet }
#
##########################################################################

#########################################################################
# WWW button --- uses Netscape by default
#
Client WWW

# I use:
# set WWW_browser lynx
#
##########################################################################

#########################################################################
# News button
#
AddButton News -imagefile $images/newspap.xpm -text News\
	   -unixcmd { netscape newsrc://news.itd.umich.edu }
#
##########################################################################

#########################################################################
# Weather button
#
AddButton Weather -text Weather -imagefile $images/weather.xpm -unixcmd {
    xterm -T Weather -e telnet um-weather.sprl.umich.edu 3000
    }	  
#
##########################################################################

##########################################################################
# A shutdown button with a cute sign-off, demonstrating one way to
# make a button run tcl code rather than a unix command.
#
# This relies on not having any root password (remember, this is for a
# home system!).
#
AddButton Shutdown -imagefile $images/xlogo.xpm -text "Shut\nDown" -tclcmd {
    TKGButton Shutdown -text BYE!\
	-tkgforeground(normal) yellow \
	-tkgforeground(active) yellow
  update
  exec su -c "/sbin/shutdown -h -t 6 now &> /dev/tty1" &
}
#
##########################################################################

# Ical (alarm daemon, item lister, etc., using ical calendar file).
Client Ical

DEBUG "Loaded .tkgoodstuffrc"
