Re: First release of mbtools
Scott Bronson <[email protected]> Wed, 17 May 2006 16:11:56 -0400
| Newsgroups | gmane.comp.lang.perl.modules.mail-box |
|---|---|
| Organization | Rinspin |
| Message-ID | <[email protected]> |
On Wed, 2006-05-17 at 14:42 -0400, Scott Bronson wrote:
> You can download them from here http://u32.net/projects/ or browse/check
> out the source using svn co http://svn.u32.net/projects/mbtools
Oops! A last-minute change broke mbtools from working with anything
beside mboxes. Gah!
Here's the patch. I'll put an updated package up soon.
- Scott
--- lib/Mail/BoxCommands.pm (revision 1963)
+++ lib/Mail/BoxCommands.pm (local)
@@ -43,7 +43,6 @@
trusted => 0, # slight performance hit but is
more careful
log => 4,
trace => 4,
- type => 'mbox', # create mbox folders by default
);
@@ -54,7 +53,7 @@
# These functions allow a command to check which options were set
sub optForce { return $force; } # should the command be
forced
sub optRecurse { return $recurse; } # should the command
recurse
-sub defaultType { return $folderAttrs{type}; } # type of folder to
create
+sub defaultType { return $folderAttrs{type} || 'mbox'; } # type to
create
=head1 METHODS