/[Frey]/trunk/lib/Frey/Web.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/Web.pm

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

revision 475 by dpavlin, Thu Nov 20 11:56:41 2008 UTC revision 476 by dpavlin, Thu Nov 20 12:56:37 2008 UTC
# Line 49  has 'content_type' => ( Line 49  has 'content_type' => (
49          is => 'rw',          is => 'rw',
50          isa => 'Str',          isa => 'Str',
51          default => 'text/html',          default => 'text/html',
52            documentation => 'Content-type header',
53    );
54    
55    has 'dump_max_bytes' => (
56            is => 'rw',
57            isa => 'Int',
58            default => 4096,
59            documentation => 'Maximum dump size sent to browser before truncation',
60  );  );
61    
62  =head2 inline_smaller_than  =head2 inline_smaller_than
# Line 158  sub page { Line 166  sub page {
166                          if ( ref($content) ) {                          if ( ref($content) ) {
167                                  $content = '<code>' . dump($content) . '</code>';                                  $content = '<code>' . dump($content) . '</code>';
168                                  my $l = length($content);                                  my $l = length($content);
169                                  $content = qq|<span>$l bytes</span>| if $l > 1024;                                  $content = qq|<span>$l bytes</span>| if $l > $self->dump_max_bytes;
170                          } else {                          } else {
171                                  $content = qq|<span>$content</span>|;                                  $content = qq|<span>$content</span>|;
172                          }                          }
Legend:
Removed from v.475  
changed lines
  Added in v.476
  ViewVC Help
Powered by ViewVC 1.1.26