diff options
author | Eric Wong <e@80x24.org> | 2016-07-06 01:18:06 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2016-07-06 07:12:45 +0000 |
commit | 10a681c149a154935e9f879c8b215074c072cc7e (patch) | |
tree | 00da264bba8caf539fbc6330111ef5992da92bd3 /lib/PublicInbox | |
parent | acac0cfb3afa26fd6556aa9f835869febcda97d8 (diff) | |
download | public-inbox-10a681c149a154935e9f879c8b215074c072cc7e.tar.gz |
This can be use to specify a small response using -html_tip.
Diffstat (limited to 'lib/PublicInbox')
-rw-r--r-- | lib/PublicInbox/WwwStream.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/PublicInbox/WwwStream.pm b/lib/PublicInbox/WwwStream.pm index 285416d5..bce384b7 100644 --- a/lib/PublicInbox/WwwStream.pm +++ b/lib/PublicInbox/WwwStream.pm @@ -9,9 +9,11 @@ use PublicInbox::Hval qw(ascii_html); use URI; use constant PI_URL => 'https://public-inbox.org/'; +sub close {} + sub new { my ($class, $ctx, $cb) = @_; - bless { nr => 0, cb => $cb, ctx => $ctx }, $class; + bless { nr => 0, cb => $cb || *close, ctx => $ctx }, $class; } sub response { @@ -99,6 +101,4 @@ sub getline { delete $self->{cb} ? _html_end($self) : undef; } -sub close {} - 1; |