version 1.89, 2007/06/20 17:33:33
|
version 1.92, 2008/11/18 19:14:28
|
Line 53
|
Line 53
|
# (32,65) : $GroupTwo[1] = "TEXT-1" |
# (32,65) : $GroupTwo[1] = "TEXT-1" |
# (21,54) : $GroupTwo[2] = "TEXT-2" |
# (21,54) : $GroupTwo[2] = "TEXT-2" |
# =========================================== |
# =========================================== |
|
|
package Apache::randomlabel; |
package Apache::randomlabel; |
use Apache::lonnet; |
use Apache::lonnet; |
use strict; |
use strict; |
Line 61 use Apache::File();
|
Line 62 use Apache::File();
|
use Apache::Constants qw(:common :http); |
use Apache::Constants qw(:common :http); |
use Image::Magick; |
use Image::Magick; |
use Apache::lonplot; |
use Apache::lonplot; |
use lib '/home/httpd/lib/perl/'; |
|
use LONCAPA; |
use LONCAPA; |
|
|
|
|
Line 179 sub end_randomlabel {
|
Line 179 sub end_randomlabel {
|
$count = $Apache::randomlabel::obj_cnt; |
$count = $Apache::randomlabel::obj_cnt; |
if( $count != 0) { $args{"cgi.$cgi_id.OBJCOUNT"}=$count; } |
if( $count != 0) { $args{"cgi.$cgi_id.OBJCOUNT"}=$count; } |
$result.='<img src="/adm/randomlabel.png?token='.$cgi_id.'" /><br />'."\n"; |
$result.='<img src="/adm/randomlabel.png?token='.$cgi_id.'" /><br />'."\n"; |
&Apache::lonnet::appenv(%args); |
&Apache::lonnet::appenv(\%args); |
} elsif ($target eq 'tex') { |
} elsif ($target eq 'tex') { |
$result='\end{picture}\\\\'; |
$result='\end{picture}\\\\'; |
$result.= ' \vskip -'.$height_param.' mm } \\\\ '; |
$result.= ' \vskip -'.$height_param.' mm } \\\\ '; |
Line 553 sub end_location {
|
Line 553 sub end_location {
|
} |
} |
|
|
# <label>$var_abc</label> |
# <label>$var_abc</label> |
|
sub insert_label { |
|
my ($after) = @_; |
|
my $depth = scalar(@Apache::lonxml::depthcounter); |
|
$depth-- if ($after); |
|
my $inset = "\t"x$depth; |
|
return "\n$inset<label></label>"; |
|
} |
|
|
sub start_label { |
sub start_label { |
my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_; |
my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_; |
my $result=''; |
my $result=''; |