![]() ![]() | ![]() |
version 1.33, 2003/09/03 21:24:32 | version 1.34, 2003/09/03 21:31:59 |
---|---|
Line 133 sub copydbfiles { | Line 133 sub copydbfiles { |
foreach (&crsdirlist($origcrsid)) { | foreach (&crsdirlist($origcrsid)) { |
if ($_=~/\.db$/) { | if ($_=~/\.db$/) { |
unless | unless |
($_=~/^(nohist\_|discussiontimes|classlist|versionupdate)/) { | ($_=~/^(nohist\_|discussiontimes|classlist|versionupdate|resourcedata)/) { |
©db($origcrsid,$newcrsid,$_); | ©db($origcrsid,$newcrsid,$_); |
} | } |
} | } |