Tried that but I keep getting empty lines

[Wed Dec 1 08:12:15 2004] [warn] [client xxx.xxx.xxx.xxx] [AxKit] after eval:

in the error log, even if the add_entry method looks like this:

sub add_entry {
    my ($self) = shift;

    die "SH DEBUG";
}

When I run a custom test script from the command line I get:

% perl test/test_history.pl
SH DEBUG at home/dmas/perl/lib/Find/test/../../Find/Repository/SearchHistory.pm line 110.


I think this is very strange.

Jan Bauer Nielsen
Center of Knowledge Technology, Technical Knowledge Center of Denmark
Anker Engelunds Vej 1, Postboks 777, 2800 Kongens Lyngby, Denmark
Direct: (+45) 4525 7221, [EMAIL PROTECTED]


Matt Sergeant wrote:
On 30 Nov 2004, at 12:34, Jan Bauer Nielsen wrote:

sub insert {
    my ($id, $query) = @_;

eval {
my $history = new Find::Repository::SearchHistory();
my $cfg = Apache::ModuleConfig->get(AxKit::Apache->request(), "Find::Setup");


        $history->add_entry($id, $query);
    };


Try adding in an AxKit::Debug(10, "after eval: $@") to see if $@ gets set at all.


--------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]



Reply via email to