loncom/homework/inputtags.pm - diff

Return to inputtags.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.227, 2007/07/10 20:51:48	version 1.228, 2007/08/03 23:29:57
Line 31 use strict;	Line 31 use strict;
use Apache::loncommon;	use Apache::loncommon;
use Apache::lonlocal;	use Apache::lonlocal;
use Apache::lonnet;	use Apache::lonnet;
use lib '/home/httpd/lib/perl/';
use LONCAPA;	use LONCAPA;


Line 116 sub check_for_duplicate_ids {	Line 115 sub check_for_duplicate_ids {

sub start_input {	sub start_input {
my ($parstack,$safeeval)=@_;	my ($parstack,$safeeval)=@_;
my $id = &Apache::lonxml::get_param('id',$parstack,$safeeval);	my $id = &Apache::lonxml::get_id($parstack,$safeeval);
if ($id eq '') { $id = $Apache::lonxml::curdepth; }
push (@Apache::inputtags::input,$id);	push (@Apache::inputtags::input,$id);
push (@Apache::inputtags::inputlist,$id);	push (@Apache::inputtags::inputlist,$id);
return $id;	return $id;