version 1.21, 2003/10/21 20:49:06
|
version 1.26, 2003/12/08 18:48:12
|
Line 75 function openHelpWindow() {
|
Line 75 function openHelpWindow() {
|
</head> |
</head> |
<body bgcolor="#ffffff"> |
<body bgcolor="#ffffff"> |
<center> |
<center> |
<applet code="JME.class" name="JME" archive="/adm/jme/JME.jar" width="97%" height="78%"> |
<applet code="JME.class" name="JME" archive="/adm/jme/JME.jar" width="440" height="420"> |
You have to enable Java and JavaScript on your machine. |
You have to enable Java and JavaScript on your machine. |
$molecule |
$molecule |
<param name="options" value="$options" /> |
<param name="options" value="$options" /> |
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.=' />'; |
Line 235 sub start_organicstructure {
|
Line 235 sub start_organicstructure {
|
if ($options =~ /border/) { $result.= '} '; } |
if ($options =~ /border/) { $result.= '} '; } |
} elsif ($target eq 'edit') { |
} elsif ($target eq 'edit') { |
$result .=&Apache::edit::tag_start($target,$token); |
$result .=&Apache::edit::tag_start($target,$token); |
$result .=&Apache::edit::text_arg('Width:','width',$token,5); |
$result .=&Apache::edit::text_arg('Width (pixels):','width',$token,5); |
$result .=&Apache::edit::text_arg('Height:','height',$token,5); |
$result .=&Apache::edit::text_arg('TeXwidth (mm):','texwidth',$token,5); |
$result .=&Apache::edit::text_arg('TeXwidth:','texwidth',$token,5); |
|
$result .='<nobr>'; |
$result .='<nobr>'; |
$result .=&Apache::edit::text_arg('Molecule:','molecule',$token,40); |
$result .=&Apache::edit::text_arg('Molecule:','molecule',$token,40); |
my $molecule=&Apache::lonxml::get_param('molecule',$parstack, |
my $molecule=&Apache::lonxml::get_param('molecule',$parstack, |
Line 256 sub start_organicstructure {
|
Line 255 sub start_organicstructure {
|
[ ['reaction','Is a reaction'], |
[ ['reaction','Is a reaction'], |
['border','Draw a border'] ], |
['border','Draw a border'] ], |
$token); |
$token); |
$result .=&Apache::edit::end_row().&Apache::edit::start_spanning_row(); |
$result .=&Apache::edit::end_row(); |
} elsif ($target eq 'modified') { |
} elsif ($target eq 'modified') { |
my $constructtag=&Apache::edit::get_new_args($token,$parstack, |
my $constructtag=&Apache::edit::get_new_args($token,$parstack, |
$safeeval,'molecule', |
$safeeval,'molecule', |
'width','height', |
'width','texwidth', |
'texwidth','options'); |
'options'); |
if ($constructtag) { $result = &Apache::edit::rebuild_tag($token); } |
if ($constructtag) { $result = &Apache::edit::rebuild_tag($token); } |
} |
} |
return $result; |
return $result; |