/*
  ==================================================
  Last edited by: $Author: mirxp $
              on: $Date: 2010/04/08 16:00:32 $
        Filename: $RCSfile: custom_new.js,v $
        Revision: $Revision: 1.2 $
  
  ==================================================
*/

function maildocument(docTitle,href,introduction)
{mail_str="mailto:?subject="+docTitle;mail_str+="&body="+introduction;mail_str+=" \r\n ";mail_str+=href;location.href=mail_str;}
function mailpage(introduction)
{mail_str="mailto:?subject="+document.title;mail_str+="&body="+introduction;mail_str+=" \r\n ";mail_str+=location.href;location.href=mail_str;}
function mailpageblank(introduction)
{mail_str="mailto:";mail_str+="&body=";mail_str+=location.href;location.href=mail_str;}
function mailpagejapan(introduction, subject)
{mail_str="mailto:?subject="+subject;mail_str+="&body="+introduction;mail_str+=" \r\n ";mail_str+=location.href;location.href=mail_str;}