![[BACK]](/icons/back.gif){kind=icon}
Return to lonclonecourse.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface|
Return to lonclonecourse.pm CVS log | Up to [LON-CAPA] / loncom / interface |
| version 1.13, 2019/06/29 23:21:05 | version 1.13.2.1, 2020/07/24 18:06:24 |
|---|---|
| Line 107 sub rewritefile { | Line 107 sub rewritefile { |
| sub copyfile { | sub copyfile { |
| my ($origcrsid,$newcrsid,$which)=@_; | my ($origcrsid,$newcrsid,$which)=@_; |
| unless ($which=~/\.sequence$/) { | unless ($which=~/\.(page|sequence)$/) { |
| return &writefile($newcrsid,$which, | return &writefile($newcrsid,$which, |
| &readfile($origcrsid,$which)); | &readfile($origcrsid,$which)); |
| } else { | } else { |