From 4b3fdf50bd0d71c59328b47297094e4fdd1579c4 Mon Sep 17 00:00:00 2001
From: John Peacock <jpeacock@cpan.org>
Date: Thu, 22 Sep 2005 17:29:13 +0000
Subject: [PATCH] * lib/Qpsmtpd.pm   By default, spool all messages to disk.

* config.sample/size_threshold
  Provide minimal explanation for how to avoid spooling small messages.

git-svn-id: https://svn.perl.org/qpsmtpd/branches/0.31@549 958fd67b-6ff1-0310-b445-bb7760255be9
---
 config.sample/size_threshold | 3 +++
 lib/Qpsmtpd.pm               | 2 +-
 2 files changed, 4 insertions(+), 1 deletion(-)
 create mode 100644 config.sample/size_threshold

diff --git a/config.sample/size_threshold b/config.sample/size_threshold
new file mode 100644
index 0000000..a6a1fb4
--- /dev/null
+++ b/config.sample/size_threshold
@@ -0,0 +1,3 @@
+# Messages below the size below will be stored in memory and not spooled.
+# Without this file, the default is 0 bytes, i.e. all messages will be spooled.
+10000
diff --git a/lib/Qpsmtpd.pm b/lib/Qpsmtpd.pm
index 8064cd4..9572df7 100644
--- a/lib/Qpsmtpd.pm
+++ b/lib/Qpsmtpd.pm
@@ -418,7 +418,7 @@ sub temp_dir {
 sub size_threshold {
   my $self = shift;
   unless ( defined $Size_threshold ) {
-    $Size_threshold = $self->config('size_threshold') || 10_000;
+    $Size_threshold = $self->config('size_threshold') || 0;
     $self->log(LOGNOTICE, "size_threshold set to $Size_threshold");
   }
   return $Size_threshold;