[LON-CAPA-cvs] cvs: loncom /interface londocs.pm

[albertel]

albertel		Sun Nov 12 01:29:33 2006 EDT

  Modified files:              
    /loncom/interface	londocs.pm 
  Log:
  - moved to LONCAPA::map
  
  
Index: loncom/interface/londocs.pm
diff -u loncom/interface/londocs.pm:1.247 loncom/interface/londocs.pm:1.248
--- loncom/interface/londocs.pm:1.247	Sat Nov 11 21:13:05 2006
+++ loncom/interface/londocs.pm	Sun Nov 12 01:29:33 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Documents
 #
-# $Id: londocs.pm,v 1.247 2006/11/12 02:13:05 www Exp $
+# $Id: londocs.pm,v 1.248 2006/11/12 06:29:33 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1003,8 +1003,8 @@
     my %parmvalue=();
 
     sub snapshotbefore {
-        @oldresources=@Apache::lonratedt::resources;
-        @oldorder=@Apache::lonratedt::order;
+        @oldresources=@LONCAPA::map::resources;
+        @oldorder=@LONCAPA::map::order;
         $parmidx=undef;
         %parmaction=();
         %parmvalue=();
@@ -1029,8 +1029,8 @@
            }
         }
         my $maxidx=$#oldresources;
-        if ($#Apache::lonratedt::resources>$#oldresources) {
-           $maxidx=$#Apache::lonratedt::resources;
+        if ($#LONCAPA::map::resources>$#oldresources) {
+           $maxidx=$#LONCAPA::map::resources;
         }
         for (my $idx=0; $idx<=$maxidx; $idx++) {
            if ($LONCAPA::map::resources[$idx] ne $oldresources[$idx]) {