//= Copyright 2002, Peter A. Curran. All rights reserved.







names =     ["office",       "minister",    "cschool",       "website"]
mailnames = ["ststephens",   "dwilson",     "jauty",         "web"]
maildmns  = ["on.aibn.com",  "on.aibn.com", "on.aibn.com",   "ststephensuc.ca"]


function mailaddr (name)
{
var i

for (i = 0; i < names.length; ++i)
if (names[i] == name)
break
if (i >= names.length)
i = 0
return mailnames[i] + "@" + maildmns[i]
}




function mailtext (text)
{
return "<em class='mail'>" + text + "</em>"
}


function Send (name, text)
{
document.write("<a href='mailto:")
document.write(mailaddr(name))
document.write("'>" + mailtext(text) + "</a>")
}


function maillink (name, domain, text)
{
document.write(makeMaillink(name, domain, text))
}

function makeMaillink (name, domain, text)
{
return "<a href='mailto:" + name + "@" + domain + "'>"
+ mailtext(text) + "</a>"
}

function makePhoneNo (area, exch, nmbr, ext)
{
result = "<em class=phone>"
+ "(" + area + ") " + exch + "-" + nmbr
if (arguments.length > 3)
result += " Ext. " + ext
result += "</em>"

return result
}


function phoneNo (area, exch, nmbr, ext)
{
if (arguments.length > 3)
document.write(makePhoneNo(area, exch, nmbr, ext))
else
document.write(makePhoneNo(area, exch, nmbr))
}