Changeset 2226f91 for perl/modules/Facebook/lib/BarnOwl/Message/Facebook.pm
- Timestamp:
- Sep 19, 2011, 1:31:34 PM (13 years ago)
- Children:
- 61d7594
- Parents:
- 9da6022
- git-author:
- Edward Z. Yang <ezyang@mit.edu> (06/20/11 11:43:49)
- git-committer:
- Edward Z. Yang <ezyang@mit.edu> (09/19/11 13:31:34)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
perl/modules/Facebook/lib/BarnOwl/Message/Facebook.pm
r9da6022 r2226f91 22 22 # TODO: Support for direct messages 23 23 # XXX: It seems that Facebook may not support this yet 24 return BarnOwl::quote('facebook-comment', $self->{post id});24 return BarnOwl::quote('facebook-comment', $self->{post_id}); 25 25 } 26 26 … … 35 35 # XXX I hope $filter isn't used for anything besides display purposes 36 36 if($inst) { 37 $filter = "facebook: " . $self->{name} . " " . $self->{post id};37 $filter = "facebook: " . $self->{name} . " " . $self->{post_id}; 38 38 BarnOwl::command("filter", $filter, 39 39 qw{type ^facebook$ and name_id}, '^'.$self->{name_id}.'$', 40 qw{and post id}, '^'.$self->{postid}.'$');40 qw{and post_id}, '^'.$self->{post_id}.'$'); 41 41 } else { 42 42 $filter = "facebook: " . $self->{name};
Note: See TracChangeset
for help on using the changeset viewer.