diff options
Diffstat (limited to 'util/tarqueue.pl')
-rw-r--r-- | util/tarqueue.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/util/tarqueue.pl b/util/tarqueue.pl index 20bda9f1..f3463f30 100644 --- a/util/tarqueue.pl +++ b/util/tarqueue.pl @@ -35,7 +35,7 @@ sub ProcessBoard $now, $owner, $board, $bakboard, $bakman, $email); MakeMail({tartarget => "$TMP/$board.tgz", - tarsource => "boards/$board/* boards/$board/.DIR", + tarsource => "boards/". substr($board, 0, 1). "/$board", mailto => "$board的版主$owner <$email>", subject => "$board的看版備份", body => @@ -47,7 +47,7 @@ sub ProcessBoard }) if( $bakboard ); MakeMail({tartarget => "$TMP/man.$board.tgz", - tarsource => "man/boards/$board/* man/boards/$board/.DIR", + tarsource => "man/boards/". substr($board, 0, 1). "/$board", mailto => "$board的版主$owner <$email>", subject => "$board的精華區備份", body => |