[LON-CAPA-cvs] cvs: loncom /imspackages imsimportdocs.pm

[albertel]

albertel		Thu Nov  2 16:07:17 2006 EDT

  Modified files:              
    /loncom/imspackages	imsimportdocs.pm 
  Log:
  - complete switch to LONCAPA::map
  
  
Index: loncom/imspackages/imsimportdocs.pm
diff -u loncom/imspackages/imsimportdocs.pm:1.18 loncom/imspackages/imsimportdocs.pm:1.19
--- loncom/imspackages/imsimportdocs.pm:1.18	Tue May 30 08:45:50 2006
+++ loncom/imspackages/imsimportdocs.pm	Thu Nov  2 16:07:15 2006
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: imsimportdocs.pm,v 1.18 2006/05/30 12:45:50 www Exp $
+# $Id: imsimportdocs.pm,v 1.19 2006/11/02 21:07:15 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -34,6 +34,7 @@
 use Apache::lonlocal;
 use Apache::imsprocessor;
 use LONCAPA::Configuration;
+use LONCAPA::map();
 use lib '/home/httpd/lib/perl/';
 use LONCAPA;
  
@@ -650,9 +651,9 @@
         my $errtext='';
         my $fatal=0;
         ($errtext,$fatal)=  &Apache::londocs::mapread($crs,$cdom,$folder.'.sequence');
-        if ($#Apache::lonratedt::order<1) {
-            $Apache::lonratedt::order[0]=1;
-            $Apache::lonratedt::resources[1]='';
+        if ($#LONCAPA::map::order<1) {
+            $LONCAPA::map::order[0]=1;
+            $LONCAPA::map::resources[1]='';
         }
         my ($errtext,$fatal)=&Apache::londocs::group_import($crs,$cdom,$folder,'sequence','imsimport',@imports);
         if ($fatal) {