diff options
author | in2 <in2@63ad8ddf-47c3-0310-b6dd-a9e9d9715204> | 2002-03-28 11:56:23 +0800 |
---|---|---|
committer | in2 <in2@63ad8ddf-47c3-0310-b6dd-a9e9d9715204> | 2002-03-28 11:56:23 +0800 |
commit | 0bf5c021474a4609772d6392baf7017ff5426b93 (patch) | |
tree | 0a9e34d195a0838940adca0cef0cf260936734e1 /util/tarqueue.pl | |
parent | 7bf58d611c172a81c6dbd595157fb6d226a72ae5 (diff) | |
download | pttbbs-0bf5c021474a4609772d6392baf7017ff5426b93.tar pttbbs-0bf5c021474a4609772d6392baf7017ff5426b93.tar.gz pttbbs-0bf5c021474a4609772d6392baf7017ff5426b93.tar.bz2 pttbbs-0bf5c021474a4609772d6392baf7017ff5426b93.tar.lz pttbbs-0bf5c021474a4609772d6392baf7017ff5426b93.tar.xz pttbbs-0bf5c021474a4609772d6392baf7017ff5426b93.tar.zst pttbbs-0bf5c021474a4609772d6392baf7017ff5426b93.zip |
boards/<HASH>
git-svn-id: http://opensvn.csie.org/pttbbs/pttbbs/trunk/pttbbs@68 63ad8ddf-47c3-0310-b6dd-a9e9d9715204
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 => |