[Maypole] 2.07 PR

n.a n.a@ad.wakwak.com
Mon, 17 Jan 2005 23:56:45 +0900


>- Removed Maypole::Model->description.
>
>Fixes:
>- Model->process() shouldn't set $r->objects() to a list with a single,
>undefined element

I'm not sure it is in the same line with this, but 'do_edit'  sets
$r->objects() to a list with a single, undefined element.

My suggesion is as follows
--------------------------------------------------------------
*** CDBI.pm     2005-01-17 23:12:35.000000000 +0900
--- CDBI.pm~    2005-01-17 02:27:08.000000000 +0900
*************** sub do_edit : Exported {
*** 134,140 ****
       else {
           $r->{template} = "view";
       }
!     $r->objects( $obj?[$obj]:[] );
   }

   sub delete : Exported {
--- 134,140 ----
       else {
           $r->{template} = "view";
       }
!     $r->objects( [$obj] );
   }

   sub delete : Exported {
--------------------------------------------------------------