![[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.537, 2012/12/07 17:16:01 | version 1.538, 2013/03/11 21:37:10 |
|---|---|
| Line 1880 sub get_courseupload_hierarchy { | Line 1880 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) { |