From: ivan <ivan>
Date: Tue, 13 Sep 2005 20:12:04 +0000 (+0000)
Subject: fix redirect with single item returned from search results and a coderef redirect
X-Git-Tag: BEFORE_FINAL_MASONIZE~393
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=c2f77e3e9f95934545331b62a19579e45c98d403

fix redirect with single item returned from search results and a coderef redirect
---

diff --git a/httemplate/search/elements/search.html b/httemplate/search/elements/search.html
index 0f499d2d0..7882bbf56 100644
--- a/httemplate/search/elements/search.html
+++ b/httemplate/search/elements/search.html
@@ -183,7 +183,9 @@
   } else { # regular HTML
 
     if ( exists($opt{'redirect'}) && scalar(@$rows) == 1 && $total == 1 ) {
-      my( $url, $method ) = @{$opt{'redirect'}};
+      my $redirect = $opt{'redirect'};
+      $redirect = &{$redirect}($rows->[0]) if ref($redirect) eq 'CODE';
+      my( $url, $method ) = @$redirect;
       redirect( $url. $rows->[0]->$method() );
     } else {
       ( my $xlsname = $opt{'name'} ) =~ s/\W//g;