--- loncom/homework/chemresponse.pm 2003/05/04 08:45:22 1.1
+++ loncom/homework/chemresponse.pm 2003/10/21 20:58:29 1.22
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# chemical equation style response
#
-# $Id: chemresponse.pm,v 1.1 2003/05/04 08:45:22 albertel Exp $
+# $Id: chemresponse.pm,v 1.22 2003/10/21 20:58:29 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -32,29 +32,44 @@ use Apache::lonxml;
use Apache::lonnet;
BEGIN {
- &Apache::lonxml::register('Apache::chemresponse',('chemresponse','chemstructure'));
+ &Apache::lonxml::register('Apache::chemresponse',('organicresponse','organicstructure','reactionresponse'));
}
sub seperate_jme_window {
- my ($id,$molecule)=@_;
+ my ($smile_input,$jme_input,$molecule,$options)=@_;
+ my $smilesection;
+ if (defined($smile_input)) {
+ $smilesection=<'; }
my $body=<
Molecule Editor
@@ -62,7 +77,8 @@ function openHelpWindow() {
JME Editor courtesy of Peter Ertl, Novartis