| # | Line 491 | Line 491 | sub copysetup { | |
|---|---|---|
| 491 | return $rv; | |
| 492 | } | |
| 493 | ||
| 494 | + | sub copyurlcache { |
| 495 | + | my $self=shift; |
| 496 | + | my $dest=shift; |
| 497 | + | my $rv=1; |
| 498 | + | # copy across the admin dir |
| 499 | + | my $temp=$self->location()."/".$self->{admindir}."/cache"; |
| 500 | + | my $temp2=$dest."/".$self->{admindir}."/cache"; |
| 501 | + | if ( $temp ne $temp2 ) { |
| 502 | + | if ( -d $temp ) { |
| 503 | + | AddDir::copydir($temp,$temp2); |
| 504 | + | $rv=0; |
| 505 | + | } |
| 506 | + | } |
| 507 | + | return $rv; |
| 508 | + | } |
| 509 | + | |
| 510 | sub copywithskip { | |
| 511 | my $self=shift; | |
| 512 | my $dest=shift; | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |