--- nsdl/lib/perl/Apache/LONCAPA/FromTheGateway.pm 2002/05/06 19:05:22 1.1 +++ nsdl/lib/perl/Apache/LONCAPA/FromTheGateway.pm 2002/07/14 07:42:46 1.4 @@ -12,7 +12,7 @@ # ================= # # This module contains functionality for -# transferring information from NSDL to the Gateway Server. +# transferring information to LON-CAPA from the Gateway Server. # # In terms of the overall data flow, the # '=====>' below indicates the role of this @@ -39,33 +39,33 @@ package Apache::LONCAPA::FromTheGateway; use strict; # enforce handling of variables, references and subroutines # ============================================================ MODULE VARIABLES -my $VERSION = sprintf("%d.%02d", q$Revision: 1.1 $ =~ /(\d+)\.(\d+)/); +my $VERSION = sprintf("%d.%02d", q$Revision: 1.4 $ =~ /(\d+)\.(\d+)/); # ================================================================= SUBROUTINES # ------------------------------- LONCAPA->search_or_browse_against_NSDLgateway sub search_or_browse_against_NSDLgateway { -# Not yet implemented -# Need to specifically characterize INPUT arguments and OUTPUT data + my ($eref)=@_; + return Apache::GATEWAY::ToLONCAPA::search_NSDLnetwork($eref); } # ------------------------------------------- LONCAPA->view_NSDLgateway_results sub view_NSDLgateway_results { -# Not yet implemented -# Need to specifically characterize INPUT arguments and OUTPUT data + my ($eref)=@_; + return Apache::GATEWAY::ToLONCAPA::view_NSDLnetwork_results($eref); } # ----------------------------------- LONCAPA->view_NSDLgateway_metadata_record sub view_NSDLgateway_metadata_record { -# Not yet implemented -# Need to specifically characterize INPUT arguments and OUTPUT data + my ($eref)=@_; + return Apache::GATEWAY::ToLONCAPA::view_NSDLnetwork_metadata_record($eref); } # ---------------------------------------- LONCAPA->access_NSDLgateway_resource sub access_NSDLgateway_resource { -# Not yet implemented -# Need to specifically characterize INPUT arguments and OUTPUT data + my ($eref)=@_; + return Apache::GATEWAY::ToLONCAPA::access_NSDLnetwork_resource($eref); } 1;