loncom/homework/chemresponse.pm - diff

Return to chemresponse.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.22, 2003/10/21 20:58:29	version 1.23, 2003/11/10 23:26:42
Line 208 sub start_organicstructure {	Line 208 sub start_organicstructure {
my $width=&Apache::lonxml::get_param('width',$parstack,$safeeval);	my $width=&Apache::lonxml::get_param('width',$parstack,$safeeval);
my $molecule=&Apache::lonxml::get_param('molecule',$parstack,$safeeval);	my $molecule=&Apache::lonxml::get_param('molecule',$parstack,$safeeval);
my $options=&Apache::lonxml::get_param('options',$parstack,$safeeval);	my $options=&Apache::lonxml::get_param('options',$parstack,$safeeval);
my $id=time.'_'.int(rand(1000));	my $id=&Apache::loncommon::get_cgi_id();
$result="<img src='/cgi-bin/convertjme.pl?$id'";	$result="<img src='/cgi-bin/convertjme.pl?$id'";
if ($options =~ /border/) { $result.= ' border="1"'; }	if ($options =~ /border/) { $result.= ' border="1"'; }
$result.=' />';	$result.=' />';