From 47135d7827c75073278089d43220df48f250b118 Mon Sep 17 00:00:00 2001
From: Guilhem Moulin <guilhem.moulin@fripost.org>
Date: Thu, 19 Apr 2012 00:12:57 +0200
Subject: Search tools.

---
 lib/Fripost/Schema/Search.pm | 10 ++++++++++
 1 file changed, 10 insertions(+)

(limited to 'lib/Fripost/Schema/Search.pm')

diff --git a/lib/Fripost/Schema/Search.pm b/lib/Fripost/Schema/Search.pm
index 7c0ece6..3dc2efa 100644
--- a/lib/Fripost/Schema/Search.pm
+++ b/lib/Fripost/Schema/Search.pm
@@ -53,6 +53,12 @@ sub _domainEntry {
     &_get_values( $entry, \%domain, 'domain', 'dc');
     map { &_get_values($entry, \%domain, $_) }
         qw /isActive owner/;
+    if (defined $domain{owner}) {
+        $domain{owner} = [ $domain{owner} ]
+            unless (ref $domain{owner}) eq 'ARRAY';
+        $domain{owner} = [ map { (split /=/, (split /,/, $_, 2)[0], 2)[1] }
+                               @{$domain{owner}} ];
+    }
     return \%domain;
 }
 
@@ -60,6 +66,10 @@ sub _aliasEntry {
     my $entry = shift;
     my %alias;
     &_get_values( $entry, \%alias, 'address', 'mailLocalAddress');
+    if (defined $alias{address}) {
+        $alias{address} = [ $alias{address} ]
+            unless (ref $alias{address}) eq 'ARRAY';
+    }
     &_get_values( $entry, \%alias, 'goto', 'mailTarget');
     &_get_values( $entry, \%alias, 'isActive');
     return \%alias;
-- 
cgit v1.2.3