From 906d5f24374eb190f6b7a00523fb16e5e683ac81 Mon Sep 17 00:00:00 2001
From: Guilhem Moulin <guilhem.moulin@fripost.org>
Date: Wed, 19 Sep 2012 02:10:41 +0200
Subject: Better way to create lists.

---
 lib/Fripost/Panel/Interface.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'lib/Fripost/Panel')

diff --git a/lib/Fripost/Panel/Interface.pm b/lib/Fripost/Panel/Interface.pm
index 0b7860e..46d4058 100644
--- a/lib/Fripost/Panel/Interface.pm
+++ b/lib/Fripost/Panel/Interface.pm
@@ -75,7 +75,7 @@ sub ListLocals : Runmode {
     # crash.
     my @mailboxes = $fp->mailbox->search( $d );
     my @aliases   = $fp->alias->search( $d );
-    my @lists     = $fp->list->search( $d );
+    my @lists     = $fp->list->search( $d, -is_pending => 0 );
 
     $fp->done;
 
@@ -221,7 +221,7 @@ sub EditLocal : Runmode {
 
     # Search for *the* matching mailbox, alias or list.
     my %local = $fp->local->get ($lu.'@'.$du, -die => 404,
-                                              -concat => "\x{0D}\x{0A}");
+                                              -concat => "\x{0D}\x{0A}" );
     die "Unknown type" unless grep { $local{type} eq $_ }
                                    qw/mailbox alias list/;
 
@@ -316,7 +316,7 @@ sub EditLocal : Runmode {
     }
     else {
         %local = $fp->local->get ($lu.'@'.$du, -die => 404,
-                                               -concat => "\x{0D}\x{0A}");
+                                               -concat => "\x{0D}\x{0A}" );
         if ($t eq 'mailbox') {
             $template->param( user => encode_entities($local{user})
                             , forwards => encode_entities($local{forwards}) );
-- 
cgit v1.2.3