Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Re: POD-Browser 0.01 released.

by PodMaster (Abbot)
on May 02, 2003 at 11:08 UTC ( #254960=note: print w/ replies, xml ) Need Help??


in reply to POD-Browser 0.01 released.

Also, due to a bug in Pod::POM, Begin nodes/commands aren't being handled correctly, so what you really want view_begin to look like is

sub view_begin { my ($self, $begin) = @_; return '' unless $begin->format() =~ /\bhtml\b/; require Pod::POM::View::Text; return Pod::POM::View::Text->new($begin)->print; }
That way =begin html <b>bolden</b> does indeed show up as bolden and not as <b>bolden</b>

Since the above approach is theoretically flawed, you could try

sub view_begin { my ($self, $begin) = @_; return '' unless $begin->format() =~ /\bhtml\b/; my $output = $begin->content->present($self); for($output){ s/&amp;/&/gi; s/&quot;/\"/gi; s/&gt;/>/gi; s/&lt;/</gi; } return $output; }
but that one's not that much better either ;) I'm currently working on fixing this in Pod::POM

update: s/=for/=begin/;#D LOL


MJD says you can't just make shit up and expect the computer to know what you mean, retardo!
I run a Win32 PPM repository for perl 5.6x+5.8x. I take requests.
** The Third rule of perl club is a statement of fact: pod is sexy.


Comment on Re: POD-Browser 0.01 released.
Select or Download Code
Re: Re: POD-Browser 0.01 released.
by gmpassos (Priest) on May 02, 2003 at 19:30 UTC
    Pod::POM has another bug, where a =item without title crash the parser:
    =head1 TITLE bla bla bla =item bla bla bla

    Graciliano M. P.
    "The creativity is the expression of the liberty".

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://254960]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (12)
As of 2014-12-18 06:01 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (42 votes), past polls