|
version 1.76, 2003/06/03 18:14:07
|
version 1.77, 2003/06/16 15:55:27
|
|
Line 1205 sub get_current_state {
|
Line 1205 sub get_current_state {
|
| return () if (! defined($sname) || ! defined($sdom)); |
return () if (! defined($sname) || ! defined($sdom)); |
| # |
# |
| my ($status,$data) = &ensure_current_data($sname,$sdom,$courseid); |
my ($status,$data) = &ensure_current_data($sname,$sdom,$courseid); |
| &Apache::lonnet::logthis |
# &Apache::lonnet::logthis |
| ('sname = '.$sname. |
# ('sname = '.$sname. |
| ' domain = '.$sdom. |
# ' domain = '.$sdom. |
| ' status = '.$status. |
# ' status = '.$status. |
| ' data is '.(defined($data)?'defined':'undefined')); |
# ' data is '.(defined($data)?'defined':'undefined')); |
| # while (my ($symb,$hash) = each(%$data)) { |
# while (my ($symb,$hash) = each(%$data)) { |
| # &Apache::lonnet::logthis($symb."\n----------------------------------"); |
# &Apache::lonnet::logthis($symb."\n----------------------------------"); |
| # while (my ($key,$value) = each (%$hash)) { |
# while (my ($key,$value) = each (%$hash)) { |
![[BACK]](/icons/back.gif){kind=icon}
Return to loncoursedata.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface