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

matthew lon-capa-cvs@mail.lon-capa.org
Fri, 11 Apr 2003 15:14:25 -0000


matthew		Fri Apr 11 11:14:25 2003 EDT

  Modified files:              
    /loncom/interface	loncoursedata.pm 
  Log:
  Fix: was returning all data the first time data was requested regardless of
  whether a specific symb was requested.
  
  
Index: loncom/interface/loncoursedata.pm
diff -u loncom/interface/loncoursedata.pm:1.67 loncom/interface/loncoursedata.pm:1.68
--- loncom/interface/loncoursedata.pm:1.67	Wed Apr  9 10:51:29 2003
+++ loncom/interface/loncoursedata.pm	Fri Apr 11 11:14:25 2003
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: loncoursedata.pm,v 1.67 2003/04/09 14:51:29 matthew Exp $
+# $Id: loncoursedata.pm,v 1.68 2003/04/11 15:14:25 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1124,7 +1124,11 @@
     my ($status,$data) = &ensure_current_data($sname,$sdom,$courseid);
     #
     if (defined($data)) {
-        return %$data;
+        if (defined($symb)) {
+            return %{$data->{$symb}};
+        } else {
+            return %$data;
+        }
     } elsif ($status eq 'no data') {
         return ();
     } else {