|
version 1.247, 2006/11/12 02:13:05
|
version 1.248, 2006/11/12 06:29:33
|
|
Line 1003 sub log_docs {
|
Line 1003 sub log_docs {
|
| my %parmvalue=(); |
my %parmvalue=(); |
| |
|
| sub snapshotbefore { |
sub snapshotbefore { |
| @oldresources=@Apache::lonratedt::resources; |
@oldresources=@LONCAPA::map::resources; |
| @oldorder=@Apache::lonratedt::order; |
@oldorder=@LONCAPA::map::order; |
| $parmidx=undef; |
$parmidx=undef; |
| %parmaction=(); |
%parmaction=(); |
| %parmvalue=(); |
%parmvalue=(); |
|
Line 1029 sub log_docs {
|
Line 1029 sub log_docs {
|
| } |
} |
| } |
} |
| my $maxidx=$#oldresources; |
my $maxidx=$#oldresources; |
| if ($#Apache::lonratedt::resources>$#oldresources) { |
if ($#LONCAPA::map::resources>$#oldresources) { |
| $maxidx=$#Apache::lonratedt::resources; |
$maxidx=$#LONCAPA::map::resources; |
| } |
} |
| for (my $idx=0; $idx<=$maxidx; $idx++) { |
for (my $idx=0; $idx<=$maxidx; $idx++) { |
| if ($LONCAPA::map::resources[$idx] ne $oldresources[$idx]) { |
if ($LONCAPA::map::resources[$idx] ne $oldresources[$idx]) { |
![[BACK]](/icons/back.gif){kind=icon}
Return to londocs.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface