loncom/interface/lonmeta.pm - diff

Return to lonmeta.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.43, 2003/12/26 21:17:37	version 1.44, 2003/12/28 20:12:59
Line 24	Line 24
# /home/httpd/html/adm/gpl.txt	# /home/httpd/html/adm/gpl.txt
#	#
# http://www.lon-capa.org/	# http://www.lon-capa.org/
#
# (TeX Content Handler
#
# 05/29/00,05/30,10/11 Gerd Kortemeyer)
#
# 10/19,10/21,10/23,11/27,08/09/01,12/22,12/24,12/25 Gerd Kortemeyer

package Apache::lonmeta;	package Apache::lonmeta;

Line 42 use Apache::lonpublisher;	Line 37 use Apache::lonpublisher;
use Apache::lonlocal;	use Apache::lonlocal;
use Apache::lonmysql;	use Apache::lonmysql;

	# MySQL table columns

	my @columns;

# ----------------------------------------- Fetch and evaluate dynamic metadata	# ----------------------------------------- Fetch and evaluate dynamic metadata

sub dynamicmeta {	sub dynamicmeta {
Line 191 sub diffgraph {	Line 190 sub diffgraph {
return $output;	return $output;
}	}

	# ==================================================== Turn MySQL row into hash

	sub metadata_col_to_hash {
	my @cols=@_;
	my %hash=();
	for (my $i=0; $i<=$#columns; $i++) {
	$hash{$columns[$i]}=$cols[$i];
	}
	return %hash;
	}

# ================================================================ Main Handler	# ================================================================ Main Handler

sub handler {	sub handler {
Line 550 ENDEDIT	Line 560 ENDEDIT
}	}
}	}

	# ================================================================= BEGIN Block
	BEGIN {
	# Get columns of MySQL metadata table
	@columns=&Apache::lonmysql::col_order('metadata');
	}
1;	1;
__END__	__END__