/************************************************************
Listserf beta .99 - Copyright Guillermo Weinmann - www.alphabetware.com
Last updated: 05/10/2002
*************************************************************/

var phabba; // declare the variable to hold the email address.
  
  function getCookie(Name) {
          var search = Name + "=";
          if (document.cookie.length > 0) { // if there are any cookies
                    offset = document.cookie.indexOf(search) ;
                    if (offset != -1) { // if cookie exists 
                              offset += search.length ;
                              // set index of beginning of value
                              end = document.cookie.indexOf(";", offset) ;
                              // set index of end of cookie value
                              if (end == -1) 
                                        end = document.cookie.length;
                              return unescape(document.cookie.substring(offset, end));
                    } 
          }
}

function makecookie (listname,someval) {
	document.cookie=listname+'='+someval+';'; // expires at the end of session by default
	document[listname].submit.value=' Thank you!';
	}
 
function checksubmit (listname) {
	var lsfemail = getCookie(listname);
	if (lsfemail!=null) {
			document[listname].submit.value = (' Again? ');
		}
  }