From f3086ca05027abfa6affcc8ffa0fe9f8d096b24a Mon Sep 17 00:00:00 2001
From: =?utf8?q?Sven=20Sch=C3=B6ling?= <s.schoeling@linet-services.de>
Date: Fri, 4 Sep 2009 10:58:57 +0200
Subject: [PATCH] Bugfix: Historiensuchmaschine, nur echte ids aus der
 Datenbank suchen
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

Fix für Bug 1101.
---
 bin/mozilla/am.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/bin/mozilla/am.pl b/bin/mozilla/am.pl
index 684632679..0aac5a17f 100644
--- a/bin/mozilla/am.pl
+++ b/bin/mozilla/am.pl
@@ -2856,7 +2856,7 @@ sub show_am_history {
     (  $form->{'searchid'} ? qq| WHERE snumbers = '|  . $searchNo{$form->{'what2search'}} . qq|_| . $form->{'searchid'} . qq|'|
      :                       qq| WHERE snumbers ~ '^| . $searchNo{$form->{'what2search'}} . qq|'|);
 
-  my @ids    = selectall_array_query($form, $dbh, $query);
+  my @ids    = grep { $_ * 1 } selectall_array_query($form, $dbh, $query);
   my $daten .= shift @ids;
   $daten    .= join '', map { " OR trans_id = $_" } @ids;
 
-- 
2.20.1