diff options
author | Eric Wong <e@80x24.org> | 2015-09-25 02:27:56 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2015-09-25 02:29:09 +0000 |
commit | 2e500cb8421e73947bc961ee57d8d57efacae394 (patch) | |
tree | 031f296d9ecae3e6cfac4a418e9440236ea65dd9 /lib | |
parent | aba24c12b87acfe2766d6e9435b4c80de70ad5ba (diff) | |
download | public-inbox-2e500cb8421e73947bc961ee57d8d57efacae394.tar.gz |
Micro-optimization, but it make using Danga::Socket for watching pipe readability easier at some point.
Diffstat (limited to 'lib')
-rw-r--r-- | lib/PublicInbox/GitCatFile.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lib/PublicInbox/GitCatFile.pm b/lib/PublicInbox/GitCatFile.pm index 3fced28d..54036961 100644 --- a/lib/PublicInbox/GitCatFile.pm +++ b/lib/PublicInbox/GitCatFile.pm @@ -8,10 +8,13 @@ use strict; use warnings; use POSIX qw(dup2); require IO::Handle; +use fields qw(git_dir pid in out); sub new { my ($class, $git_dir) = @_; - bless { git_dir => $git_dir }, $class; + my $self = fields::new($class); + $self->{git_dir} = $git_dir; + $self; } sub _cat_file_begin { |