<!--
function emailCheck (emailStr) {
<!-- This script and many more are available free online at -->
<!-- The JavaScript Source!! http://javascript.internet.com -->
var emailPat=/^(.+)@(.+)$/
var specialChars="@,;:\\\\\\\"\\.\\[\\'>\\(\\)<>@,;:\\\\\\\"\\.\\[\\]"
var validChars="\[^\\s" + specialChars + "\]"
var quotedUser="(\"[^\"]*\")"
var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/
var atom=validChars + '+'
var word="(" + atom + "|" + quotedUser + ")"
var userPat=new RegExp("^" + word + "(\\." + word + ")*$")
var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$")
var matchArray=emailStr.match(emailPat)
if (matchArray==null) {
return false
}
var user=matchArray[1]
var domain=matchArray[2]
if (user.match(userPat)==null) {
 return false
}
var IPArray=domain.match(ipDomainPat)
if (IPArray!=null) {
 for (var i=1;i<=4;i++) {
 if (IPArray[i]>255) {
return false
 }
 }
 return true
}
var domainArray=domain.match(domainPat)
if (domainArray==null) {
 return false
}
var atomPat=new RegExp(atom,"g")
var domArr=domain.match(atomPat)
var len=domArr.length
if (domArr[domArr.length-1].length<2 || 
 domArr[domArr.length-1].length>4) {
 return false
}
if (len<2) {
 return false
}
return true;
}
function submitform() {
if (document.comments_form.author.value == "") {
alert("Please provide a name.");
document.comments_form.author.focus();
return false;
}
//else if (document.comments_form.email.value == "") {
//alert("Please provide an email address.");
//document.comments_form.email.focus();
//return false;
//}
else if (document.comments_form.email.value != "" && !emailCheck(document.comments_form.email.value)) {
alert("The email address you have entered is invalid.");
document.comments_form.email.focus();
return false;
}
else if (document.comments_form.text.value == "") {
alert("Please enter your comment to continue.");
document.comments_form.text.focus();
return false;
}
else {
if (document.comments_form.bakecookie.checked) {
rememberMe();
}
else {
forgetMe();
}
return true;
}
}
function fillinhttp() {
if (document.comments_form.url.value == ""){
document.comments_form.url.value = "http://";
}
}
function getridofhttp() {
if (document.comments_form.url.value == "http://") {
document.comments_form.url.value = "";
}
}
// Cookie
var HOST = 'orweblog.oclc.org';
// Copyright (c) 1996-1997 Athenia Associates.
// http://www.webreference.com/js/
// License is granted if and only if this entire
// copyright notice is included. By Tomer Shiran.
function setCookie (name, value, expires, path, domain, secure) {
 var curCookie = name + "=" + escape(value) + ((expires) ? "; expires=" + expires.toGMTString() : "") + ((path) ? "; path=" + path : "") + ((domain) ? "; domain=" + domain : "") + ((secure) ? "; secure" : "");
 document.cookie = curCookie;
}
function getCookie (name) {
 var prefix = name + '=';
 var c = document.cookie;
 var nullstring = '';
 var cookieStartIndex = c.indexOf(prefix);
 if (cookieStartIndex == -1)
 return nullstring;
 var cookieEndIndex = c.indexOf(";", cookieStartIndex + prefix.length);
 if (cookieEndIndex == -1)
 cookieEndIndex = c.length;
 return unescape(c.substring(cookieStartIndex + prefix.length, cookieEndIndex));
}
function deleteCookie (name, path, domain) {
 if (getCookie(name))
 document.cookie = name + "=" + ((path) ? "; path=" + path : "") + ((domain) ? "; domain=" + domain : "") + "; expires=Thu, 01-Jan-70 00:00:01 GMT";
}
function fixDate (date) {
 var base = new Date(0);
 var skew = base.getTime();
 if (skew > 0)
 date.setTime(date.getTime() - skew);
}
function rememberMe () {
 var now = new Date();
 fixDate(now);
now.setTime(now.getTime() + 365 * 24 * 60 * 60 * 1000);
 setCookie('mtcmtauth', document.comments_form.author.value, now, '', HOST, '');
 setCookie('mtcmtmail', document.comments_form.email.value, now, '', HOST, '');
 setCookie('mtcmthome', document.comments_form.url.value, now, '', HOST, '');
setCookie('mtcmtrem', true, now, '', HOST, '');
}
function forgetMe () {
 deleteCookie('mtcmtmail', '', HOST);
 deleteCookie('mtcmthome', '', HOST);
 deleteCookie('mtcmtauth', '', HOST);
deleteCookie('mtcmtrem', '', HOST);
// f.email.value = '';
// f.author.value = '';
// f.url.value = '';
}
//-->

/*
* Clear Default Text: functions for clearing and replacing default text in
* <input> elements.
*
* by Ross Shannon, http://www.yourhtmlsource.com/
*/
/* 
* Cross-browser event handling, by Scott Andrew
*/
function addEvent(element, eventType, lamdaFunction, useCapture) {
 if (element.addEventListener) {
 element.addEventListener(eventType, lamdaFunction, useCapture);
 return true;
 } else if (element.attachEvent) {
 var r = element.attachEvent('on' + eventType, lamdaFunction);
 return r;
 } else {
 return false;
 }
}
/* 
* Kills an event's propagation and default action
*/
function knackerEvent(eventObject) {
 if (eventObject && eventObject.stopPropagation) {
 eventObject.stopPropagation();
 }
 if (window.event && window.event.cancelBubble ) {
 window.event.cancelBubble = true;
 }
 
 if (eventObject && eventObject.preventDefault) {
 eventObject.preventDefault();
 }
 if (window.event) {
 window.event.returnValue = false;
 }
}
/* 
* Safari doesn't support canceling events in the standard way, so we must
* hard-code a return of false for it to work.
*/
function cancelEventSafari() {
 return false; 
}
/* 
* Cross-browser style extraction, from the JavaScript & DHTML Cookbook
* <http://www.oreillynet.com/pub/a/javascript/excerpt/JSDHTMLCkbk_chap5/index5.html>
*/
function getElementStyle(elementID, CssStyleProperty) {
 var element = document.getElementById(elementID);
 if (element.currentStyle) {
 return element.currentStyle[toCamelCase(CssStyleProperty)];
 } else if (window.getComputedStyle) {
 var compStyle = window.getComputedStyle(element, '');
 return compStyle.getPropertyValue(CssStyleProperty);
 } else {
 return '';
 }
}
/* 
* CamelCases CSS property names. Useful in conjunction with 'getElementStyle()'
* From <http://dhtmlkitchen.com/learn/js/setstyle/index4.jsp>
*/
function toCamelCase(CssProperty) {
 var stringArray = CssProperty.toLowerCase().split('-');
 if (stringArray.length == 1) {
 return stringArray[0];
 }
 var ret = (CssProperty.indexOf("-") == 0)
 ? stringArray[0].charAt(0).toUpperCase() + stringArray[0].substring(1)
 : stringArray[0];
 for (var i = 1; i < stringArray.length; i++) {
 var s = stringArray[i];
 ret += s.charAt(0).toUpperCase() + s.substring(1);
 }
 return ret;
}
/*
* Disables all 'test' links, that point to the href '#', by Ross Shannon
*/
function disableTestLinks() {
 var pageLinks = document.getElementsByTagName('a');
 for (var i=0; i<pageLinks.length; i++) {
 if (pageLinks[i].href.match(/[^#]#$/)) {
 addEvent(pageLinks[i], 'click', knackerEvent, false);
 }
 }
}
/* 
* Cookie functions
*/
function createCookie(name, value, days) {
 var expires = '';
 if (days) {
 var date = new Date();
 date.setTime(date.getTime() + (days*24*60*60*1000));
 var expires = '; expires=' + date.toGMTString();
 }
 document.cookie = name + '=' + value + expires + '; path=/';
}
function readCookie(name) {
 var cookieCrumbs = document.cookie.split(';');
 var nameToFind = name + '=';
 for (var i = 0; i < cookieCrumbs.length; i++) {
 var crumb = cookieCrumbs[i];
 while (crumb.charAt(0) == ' ') {
 crumb = crumb.substring(1, crumb.length); /* delete spaces */
 }
 if (crumb.indexOf(nameToFind) == 0) {
 return crumb.substring(nameToFind.length, crumb.length);
 }
 }
 return null;
}
function eraseCookie(name) {
 createCookie(name, '', -1);
}

addEvent(window, 'load', init, false);
function init() {
 var formInputs = document.getElementsByTagName('input');
 for (var i = 0; i < formInputs.length; i++) {
 var theInput = formInputs[i];
 
 if (theInput.type == 'text' && theInput.className.match(/\bcleardefault\b/)) { 
 /* Add event handlers */ 
 addEvent(theInput, 'focus', clearDefaultText, false);
 addEvent(theInput, 'blur', replaceDefaultText, false);
 
 /* Save the current value */
 if (theInput.value != '') {
 theInput.defaultText = theInput.value;
 }
 }
 }
}
function clearDefaultText(e) {
 var target = window.event ? window.event.srcElement : e ? e.target : null;
 if (!target) return;
 
 if (target.value == target.defaultText) {
 target.value = '';
 }
}
function replaceDefaultText(e) {
 var target = window.event ? window.event.srcElement : e ? e.target : null;
 if (!target) return;
 
 if (target.value == '' && target.defaultText) {
 target.value = target.defaultText;
 }
}

function closeComments (entryDate) {
var currentDate = new Date();
currentDate.setFullYear(2008, 04, 01);

//var currentDate = new Date("04/01/2008");
//alert("Today: " + currentDate);
var ed = new Date(entryDate);
//alert(entryDate);
//alert("Entry Date: " + ed.getFullYear());
// +x is the increment 
var expireDate = new Date(ed.getFullYear(),(ed.getMonth() + 3), ed.getDate());
//alert("expire: " + expireDate);
if (currentDate >= expireDate)
{
document.getElementById('archive-entry-comment-form').style.display='none';
document.getElementById('CommentsClosed').style.display='block';
}
}