# HG changeset patch
# User Matthias Förste foerste@schlittermann.de
# Date 1320854254 -3600
# Node ID 262cfae21b616083d80d92738b2d93fc8af2508a
# Parent  493a7595db0331311c37838c3336a651166bf925
folderlist is supposed to be an array ref

diff -r 493a7595db03 -r 262cfae21b61 isearch
--- a/isearch	Wed Nov 09 11:09:41 2011 +0100
+++ b/isearch	Wed Nov 09 16:57:34 2011 +0100
@@ -76,7 +76,7 @@
 my $imap = Mail::IMAPClient->new(%imapopts)
   or die "Could not connect to IMAP server\n";
 
-my $f = (@ARGV or $imap->folders);
+my $f = ([@ARGV] or $imap->folders);
 die "Can't get folderlist: " . $imap->LastError . "\n" unless $f;
 
 my $mids;