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

[raeburn]

raeburn		Mon Oct  5 16:23:49 2015 EDT

  Modified files:              
    /loncom/interface	lonnavmaps.pm 
  Log:
  - Fix scope.
  
  
Index: loncom/interface/lonnavmaps.pm
diff -u loncom/interface/lonnavmaps.pm:1.510 loncom/interface/lonnavmaps.pm:1.511
--- loncom/interface/lonnavmaps.pm:1.510	Mon Oct  5 01:52:10 2015
+++ loncom/interface/lonnavmaps.pm	Mon Oct  5 16:23:49 2015
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Navigate Maps Handler
 #
-# $Id: lonnavmaps.pm,v 1.510 2015/10/05 01:52:10 raeburn Exp $
+# $Id: lonnavmaps.pm,v 1.511 2015/10/05 16:23:49 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -5414,7 +5414,6 @@
             }
             my @sorted_slots = &Apache::loncommon::sorted_slots(\@slots,\%slots,'starttime');
             my ($checkedin,$checkedinslot);
-            my ($map) = &Apache::lonnet::decode_symb($symb);
             foreach my $slot_name (@sorted_slots) {
                 next if (!defined($slots{$slot_name}) || !ref($slots{$slot_name}));
                 my $end = $slots{$slot_name}->{'endtime'};
@@ -5473,6 +5472,7 @@
         my $reservable = &Apache::lonnet::get_reservable_slots($cnum,$cdom,$env{'user.name'},
                                                                $env{'user.domain'});
         if (ref($reservable) eq 'HASH') {
+            my ($map) = &Apache::lonnet::decode_symb($symb);
             if ((ref($reservable->{'now_order'}) eq 'ARRAY') && (ref($reservable->{'now'}) eq 'HASH')) {
                 foreach my $slot (reverse (@{$reservable->{'now_order'}})) {
                     my $canuse;