From 260de3afbbab545aa8972e39690a992b6aac7083 Mon Sep 17 00:00:00 2001
From: Jamie Cameron <jcameron@webmin.com>
Date: Thu, 31 Jul 2008 18:31:19 +0000
Subject: [PATCH] Auto-submit on folder change

---
 mailboxes/boxes-lib.pl  | 3 +++
 mailboxes/list_mail.cgi | 2 +-
 2 files changed, 4 insertions(+), 1 deletion(-)

diff --git a/mailboxes/boxes-lib.pl b/mailboxes/boxes-lib.pl
index ef429657a..f482cdc8d 100644
--- a/mailboxes/boxes-lib.pl
+++ b/mailboxes/boxes-lib.pl
@@ -1329,6 +1329,7 @@ else {
 }
 
 # simplify_subject(subject)
+# Simplifies and truncates a subject for display in the mail list
 sub simplify_subject
 {
 local $rv = &eucconv(&decode_mimewords($_[0]));
@@ -1337,6 +1338,7 @@ return &html_escape($rv);
 }
 
 # quoted_decode(text)
+# Converts quoted-printable format to the original
 sub quoted_decode
 {
 local $t = $_[0];
@@ -1348,6 +1350,7 @@ return $t;
 }
 
 # quoted_encode(text)
+# Encodes text to quoted-printable format
 sub quoted_encode
 {
 local $t = $_[0];
diff --git a/mailboxes/list_mail.cgi b/mailboxes/list_mail.cgi
index d9accc0b6..dbe94ead2 100755
--- a/mailboxes/list_mail.cgi
+++ b/mailboxes/list_mail.cgi
@@ -31,7 +31,7 @@ print &check_clicks_function();
 ($folder) = grep { $_->{'index'} == $in{'folder'} } @folders;
 
 # Get folder-selection HTML
-$sel = &folder_select(\@folders, $folder, "folder");
+$sel = &folder_select(\@folders, $folder, "folder", undef, 0, 1);
 
 # Work out start from jump page
 $perpage = $folder->{'perpage'} || $config{'perpage'};