From 22d37ee308fb33851a41cfa724d34ab9528cc57f Mon Sep 17 00:00:00 2001
From: Simon Cozens <simon@simon-cozens.org>
Date: Wed, 24 Nov 2004 23:28:46 +0000
Subject: [PATCH] don't use deprecated CDBI::ContextualSearch param

git-svn-id: http://svn.maypole.perl.org/Maypole/trunk@290 48953598-375a-da11-a14b-00016c27c3ee
---
 lib/Maypole/Model/CDBI.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Maypole/Model/CDBI.pm b/lib/Maypole/Model/CDBI.pm
index 618076f..14f2f0b 100644
--- a/lib/Maypole/Model/CDBI.pm
+++ b/lib/Maypole/Model/CDBI.pm
@@ -167,7 +167,7 @@ sub search : Exported {
     $r->objects(
         [
             $self->search_where(
-                \%values, ( $order ? { order => $order } : () )
+                \%values, ( $order ? { order_by => $order } : () )
             )
         ]
     );
-- 
2.39.2