nsdl/lib/perl/Apache/GATEWAY/FromLONCAPA.pm - diff

Return to FromLONCAPA.pm CVS log

Up to [LON-CAPA] / nsdl / lib / perl / Apache / GATEWAY

version 1.1, 2002/05/07 15:59:40	version 1.2, 2002/05/29 01:01:37
Line 37 package Apache::GATEWAY::FromLONCAPA;	Line 37 package Apache::GATEWAY::FromLONCAPA;

# ================================================================ DEPENDENCIES	# ================================================================ DEPENDENCIES
use strict; # enforce handling of variables, references and subroutines	use strict; # enforce handling of variables, references and subroutines
	use Apache::LONCAPA::ToTheGateway;

# ============================================================ MODULE VARIABLES	# ============================================================ MODULE VARIABLES
my $VERSION = sprintf("%d.%02d", q$Revision$ =~ /(\d+)\.(\d+)/);	my $VERSION = sprintf("%d.%02d", q$Revision$ =~ /(\d+)\.(\d+)/);
Line 51 sub view_LONCAPAnetwork_results {	Line 52 sub view_LONCAPAnetwork_results {

# -------------------------------- GATEWAY->view_LONCAPAnetwork_metadata_record	# -------------------------------- GATEWAY->view_LONCAPAnetwork_metadata_record
sub view_LONCAPAnetwork_metadata_record {	sub view_LONCAPAnetwork_metadata_record {
# Not yet implemented	my ($eref,$id)=@_;
# Need to specifically characterize INPUT arguments and OUTPUT data	my $url; # determine url
	return Apache::LONCAPA::ToTheGateway::answer_metadata_record_request($url);
}	}

# ------------------------------------- GATEWAY->access_LONCAPAnetwork_resource	# ------------------------------------- GATEWAY->access_LONCAPAnetwork_resource