#!/bin/sh
#
# a qmail biff


#-------------#
### subfunc ###
#-------------#

# Counts mail

count_mail(){
	maildir="$HOME/Maildir/$1"
	mail_no=0

	for file in $(ls -1 $maildir); do
		mail_no=$(( $mail_no + 1 ))
	done
	echo $mail_no
}


#----------#
### main ###
#----------#



new_mail_no=$(count_mail new) 		# call subfunc with
old_mail_no=$(count_mail cur)		#   args & assign

xmess_out=$(
echo "
  $new_mail_no new mails
 $old_mail_no read mails
 " | xmessage -buttons quit,"read mail" -print -file - )


case $xmess_out in 
	"read mail" )
		su frank -c 'xterm -e mutt'		# Edit?
		;; 
	quit ) 
		: 
		;;
	ohno )
		echo "script's gone t*ts up" 
		return 1;; 
esac