[jifty-devel] Using Scalar::Defer in J::A::CreateXXX causes an error

[IN SUK JOUNG]

I have a problem in writing a 'param' in J::A::CreateXXX.

The action param below works in normal actions(MyWeblog::Action::XXXX) but
causes an error in MyWeblog::Action::CreateXXX.
Error in C:\Perl\site\lib\Scalar\Defer.pm line 41
Undefined subroutine &main:: called at C:/Perl/site/lib/Scalar/Defer.pm line
41.

    param mother =>
        render as 'select',
        label is 'Mother Group',
        valid_values are defer {
            my $collection = MyWeblog::Model::GroupCollection->new;
            $collection->unlimit;
            my @results = { display => 'Top Group', value => 0 };
            while ( my $record = $collection->next ) {
                push @results, {
                    display => $record->group_id,
                    value   => $record->id,
                };
            }
            return \@results;
        };

How do I override params like this in  MyWeblog::Action::CreateXXX?
-- 
Best,
In-Suk Joung
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.bestpractical.com/pipermail/jifty-devel/attachments/20070421/fbea9e6b/attachment.htm