![[BACK]](/icons/back.gif){kind=icon}
Return to lonxml.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / xml|
Return to lonxml.pm CVS log | Up to [LON-CAPA] / loncom / xml |
| version 1.531.2.5, 2012/12/13 22:28:15 | version 1.531.2.6, 2013/03/18 00:04:27 |
|---|---|
| Line 1975 sub get_courseupload_hierarchy { | Line 1975 sub get_courseupload_hierarchy { |
| while (@folders) { | while (@folders) { |
| my $folder=shift(@folders); | my $folder=shift(@folders); |
| my $foldername=shift(@folders); | my $foldername=shift(@folders); |
| $foldername =~ s/\:(\d*)\:(\w*)\:(\w*):(\d*)\:?(\d*)$//; | |
| push(@pathitems,&unescape($foldername)); | push(@pathitems,&unescape($foldername)); |
| } | } |
| if ($title) { | if ($title) { |