#
#(rr)b|an`qcev[g
#
#[Mʂ̐ݒt@CłB
#ʏ̂gslkƓoŕҏW邱Ƃo܂B
#ȂArɂu$`v͂ꂼvOɂĔCӂ̕
#u܂B
#

package DESIGN;

#
#   ͉
#
sub hidden_mail {
	my $name = shift;
	my $r_timekey = shift;

    print <<"<<<<<<<<<<<<<<<<<<<<<< gslkł >>>>>>>>>>>>>>>>>>>>>>";
[<a href="$CNF::place{'this'}{'url'}?id=$::FORM{'id'}">߂</a>]
${&line}
<form action="$CNF::place{'this'}{'path'}"
      method="@{[(($::FLAG{'mobile'}{'imode'})||($::FLAG{'mobile'}{'wap20'})||($::FLAG{'mobile'}{'willcom'})) ? 'post' : 'get']}">
[<br>
:<br>
<strong>$name</strong><br>
O:<br>
<input type=text name="name" size=14 value="$::COOKIE{'name'}" istyle=1><br>
EҰ:<br>
<input type=text name="email" size=14 value="$::COOKIE{'email'}" istyle=3><br>
:<br>
<input type=text name="subject" size=14 value="" istyle=1><br>
{:<br>
<textarea name="body" cols=14 rows=4 istyle=1></textarea><br>
<input type=hidden name="no" value="$::FORM{'no'}">
<input type=hidden name="id" value="$::FORM{'id'}">
<input type=hidden name="cmd" value="hml">
<input type="hidden" name="timekey" value="$r_timekey">
<input type=submit value="M">
<<<<<<<<<<<<<<<<<<<<<< gslkł >>>>>>>>>>>>>>>>>>>>>>
}
#܂ń

1;

# $Id: hmn.txt,v 1.1.1.2 2001/11/02 14:25:00 N.Hirai Exp $;
