![[BACK]](/icons/back.gif){kind=icon}
Return to lchtmldir CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom|
Return to lchtmldir CVS log | Up to [LON-CAPA] / loncom |
| version 1.2, 2002/05/03 03:21:25 | version 1.3, 2002/05/03 03:43:54 |
|---|---|
| Line 179 if(!( -e $dirtry1)) { | Line 179 if(!( -e $dirtry1)) { |
| } | } |
| &EnableRoot; | &EnableRoot; |
| &System("/bin/mkdir $fulldir") unless (-e $fulldir); | &System("/bin/mkdir -p $fulldir") unless (-e $fulldir); |
| unless(-e $fulldir."/index.html") { | unless(-e $fulldir."/index.html") { |
| open OUT,">".$fulldir."/index.html"; | open OUT,">".$fulldir."/index.html"; |
| print OUT<<END; | print OUT<<END; |