Hi Steve,
>> In my taglib, I export the following:
>>
>> @EXPORT_TAGLIB = ('index($uri):listtag=records:itemtag=record');
>>
>> However, no matter how I return my result, I invariably get:
>
>Your export_taglib looks correct. I'm just wondering, is it possible
it's
>some more mundane error? Perhaps you're redefining export_taglib later
in
>the module? Or you're not using the module you think you are?
I understand your concern; however, we're talking about a 10 line test
module - and yes, I'm positively sure I'm using the right one - every
other change I make to the module is immediately reflected in the
output.
Presently, the entire module looks like this:
| package Skjaerlund::XSP::Indexer;
|
| use Apache::AxKit::Language::XSP::TaglibHelper;
|
| @ISA = qw( Apache::AxKit::Language::XSP::TaglibHelper );
|
| $NS = 'http://skjaerlund.dk/perl/xsp/indexer';
| @EXPORT_TAGLIB = ('index($path):listtag=mylist:itemtag=item');
|
| use strict;
| use XML::Simple;
|
| sub index {
| my $path = shift;
| $path =~ s/(.*\/)[^\/]*$/$1/;
|
| my @files = <$path*xsp>;
| my @titles = ();
|
| foreach my $file (@files) {
| my $name = $file;
| $name =~ s/.*\/([^\/]*)$/$1/;
| if (($name ne 'idx.xsp') and ($name ne 'index.xsp')) {
| my $xml = XMLin($file);
| @titles = (@titles, { 'title' => "$xml->{data}->{title}",
| 'name' => $name } );
| }
| }
|
| return @titles;
| }
|
| 1;
Regards,
Lars
Lars SkjÃrlund, Network Consultant, Spinn International ApS
Bukkeballevej 30, 2960 Rungsted Kyst, Denmark
Tel.: +45 70 25 88 10, Fax: +45 70 25 88 44
Mail: [EMAIL PROTECTED] Web: http://www.spinn.dk
--
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
