[LON-CAPA-cvs] cvs: loncom /interface londocs.pm
albertel
lon-capa-cvs@mail.lon-capa.org
Fri, 30 Jun 2006 00:59:00 -0000
albertel Thu Jun 29 20:59:00 2006 EDT
Modified files:
/loncom/interface londocs.pm
Log:
- BUG#4868 DOCS dumps folders with "/" in title incorrectly
Index: loncom/interface/londocs.pm
diff -u loncom/interface/londocs.pm:1.234 loncom/interface/londocs.pm:1.235
--- loncom/interface/londocs.pm:1.234 Thu Jun 29 20:47:14 2006
+++ loncom/interface/londocs.pm Thu Jun 29 20:59:00 2006
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Documents
#
-# $Id: londocs.pm,v 1.234 2006/06/30 00:47:14 albertel Exp $
+# $Id: londocs.pm,v 1.235 2006/06/30 00:59:00 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -237,8 +237,10 @@
'ids_/uploaded/'.$origcrsdata{'domain'}.'/'.$origcrsdata{'num'}.'/'.$_}};
$title=~s/:/:/g;
$r->print('<td>'.($title?$title:' ').'</td>');
- unless ($title) {
+ if (!$title) {
$title=$_;
+ } else {
+ $title=~s|/|_|g;
}
$title=~s/\.(\w+)$//;
$title=&clean($title);