It would seem you cant call a Perl Method. The problem would be seem to in Zope.pm in the compartment_pyobject_AUTOLOAD, where it tries to acquire the object, and of course it cant acquire &Zope::_recompile. Dont know the solution off the top of my head though... I have cross posted this email to the zope-perl mailing list, since you are more likely to get an intelligent response from that list. -- Andy McKay. ----- Original Message ----- From: "Ulrich Wisser" <u.wisser@publisher.de> To: <zope@zope.org> Sent: Tuesday, February 13, 2001 3:25 AM Subject: [Zope] PerlMethod invocation
Hello,
one of my PerlMethods returns a array ref. Another PerlMethod tries to get this ref and construct a select form from the data. Please find my code below.
When I try to get the array with
$self->reportlist($self) I get a Zope error
Error Type: PerlError Error Value: Undefined subroutine &Zope::_recompile called at /usr/local/Zope-2.2.5-linux2-x86/lib/perl/Zope.pm line 98.
What do I do wrong?
(Zope 2.2.5, Linux, perl 5.6.1-TRIAL1, zoperl-1.0beta3, pyperl-1.0beta3)
Thanks
Ulrich
PerlMethods:
id: reportliste arguments: code: my @reports = ( [0, 'Übersicht', '/report/overview'], [1, 'Statistik', '/report/history'], [2, 'Alle Seiten', '/report/pages'], [3, 'Seiten mit IVW', '/report/ivw'], [4, 'Seiten ohne IVW', '/report/noivw'], [5, 'Angemeldete Seiten', '/report/submitted'], [6, 'Seiten mit Zugriffsfehler', '/report/httperror'], [7, 'Broken Links', '/report/brokenlinks'], [8, 'Seiten ohne Link', '/report/deadlink'], [9, 'Header', '/report/header'] );
return \@reports;
id: chooseReport arguments: self code: my $report = shift; my $res; my $reports = $self->reportliste($self);
$res = '<select name="report">'; foreach my $r (@$reports) { $res .= '<option value="'. $r->[0] .'"'; $res .= 'selected' if ($r->[0] == $report); $res .= '>' . $r->[1]; } $res .= '</select>'; return $res; -- Searchengine Know How - Webpromotion - Optimization - Internal Search World Wide Web Publisher, Ulrich Wisser, Odensvag 13, S-14571 Norsborg http://www.publisher.de Tel: +46-8-53460905 Fax: +46-8-534 609 06
_______________________________________________ Zope maillist - Zope@zope.org http://lists.zope.org/mailman/listinfo/zope ** No cross posts or HTML encoding! ** (Related lists - http://lists.zope.org/mailman/listinfo/zope-announce http://lists.zope.org/mailman/listinfo/zope-dev )