/[Frey]/trunk/lib/Frey/Pod.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/lib/Frey/Pod.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 799 by dpavlin, Wed Dec 10 19:34:06 2008 UTC revision 800 by dpavlin, Wed Dec 10 20:27:34 2008 UTC
# Line 48  sub as_markup { Line 48  sub as_markup {
48          sub heading {          sub heading {
49                  my ($level,$html) = @_;                  my ($level,$html) = @_;
50                  push @toc, { $level => $html };                  push @toc, { $level => $html };
51                  warn "# heading $level $html";                  warn "## heading $level $html" if $self->debug;
52                  qq|<$level>$html</$level>|;                  qq|<$level>$html</$level>|;
53          }          }
54          $body =~ s{<(h\d+)>(.+?)</\1>}{heading($1,$2)}egs;          $body =~ s{<(h\d+)>(.+?)</\1>}{heading($1,$2)}egs;
# Line 101  sub as_markup { Line 101  sub as_markup {
101                          .pod-toc a {                          .pod-toc a {
102                                  text-decoration: none;                                  text-decoration: none;
103                          }                          }
104    
105                  |);                  |);
106                  $toc_html = qq|<div class="pod-toc">$toc_html</div>|;                  $toc_html = qq|<div class="pod-toc">$toc_html</div>|;
107          }          }
108    
109            $self->add_css(qq|
110                    pre {
111                            color: #444;
112                            border: 1px solid #eee;
113                            padding-top: 0.5em;
114                            padding-bottom: 0.5em;
115                    }
116            |);
117    
118          return $toc_html . $body;          return $toc_html . $body;
119    
120  }  }
Legend:
Removed from v.799  
changed lines
  Added in v.800
  ViewVC Help
Powered by ViewVC 1.1.26