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

matthew lon-capa-cvs@mail.lon-capa.org
Wed, 24 Sep 2003 15:58:06 -0000


matthew		Wed Sep 24 11:58:06 2003 EDT

  Modified files:              
    /loncom/interface	lonnavmaps.pm 
  Log:
  Return an array instead of array ref.
  
  
Index: loncom/interface/lonnavmaps.pm
diff -u loncom/interface/lonnavmaps.pm:1.233 loncom/interface/lonnavmaps.pm:1.234
--- loncom/interface/lonnavmaps.pm:1.233	Wed Sep 24 11:02:34 2003
+++ loncom/interface/lonnavmaps.pm	Wed Sep 24 11:58:06 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Navigate Maps Handler
 #
-# $Id: lonnavmaps.pm,v 1.233 2003/09/24 15:02:34 matthew Exp $
+# $Id: lonnavmaps.pm,v 1.234 2003/09/24 15:58:06 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3547,7 +3547,7 @@
     my $part = shift;
 
     $self->extractParts();
-    return $self->{RESPONSE_TYPES}->{$part};
+    return @{$self->{RESPONSE_TYPES}->{$part}};
 }
 
 sub responseIds {
@@ -3555,7 +3555,7 @@
     my $part = shift;
 
     $self->extractParts();
-    return $self->{RESPONSE_IDS}->{$part};
+    return @{$self->{RESPONSE_IDS}->{$part}};
 }
 
 # Private function: Extracts the parts information, both part names and