loncom/interface/loncommon.pm - diff

Return to loncommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.131, 2003/10/16 20:03:31	version 1.133, 2003/10/23 21:01:54
Line 2663 $uname, optional the username of the use	Line 2663 $uname, optional the username of the use

sub check_if_partid_hidden {	sub check_if_partid_hidden {
my ($id,$symb,$udom,$uname) = @_;	my ($id,$symb,$udom,$uname) = @_;
my $hiddenparts=&Apache::lonnet::EXT('resource.0.parameter_hiddenparts',	my $hiddenparts=&Apache::lonnet::EXT('resource.0.hiddenparts',
$symb,$udom,$uname);	$symb,$udom,$uname);
my @hiddenlist=split(/,/,$hiddenparts);	my @hiddenlist=split(/,/,$hiddenparts);
foreach my $checkid (@hiddenlist) {	foreach my $checkid (@hiddenlist) {
Line 2697 sub DrawGraph {	Line 2697 sub DrawGraph {
my $NumSets=1;	my $NumSets=1;
foreach my $array (@Values) {	foreach my $array (@Values) {
next if (! ref($array));	next if (! ref($array));
$ValuesHash{$identifier.'.data.'.$NumSets++} = join(',',@$array);	$ValuesHash{'cgi.'.$identifier.'.data.'.$NumSets++} =
	join(',',@$array);
}	}
#	#
$Title = '' if (! defined($Title));	$Title = '' if (! defined($Title));