Changeset 3d10ed3
- Timestamp:
- Sep 20, 2011, 11:15:31 PM (13 years ago)
- Branches:
- master, release-1.10, release-1.9
- Children:
- 460413f
- Parents:
- 63afb72
- git-author:
- Edward Z. Yang <ezyang@mit.edu> (06/19/11 22:46:32)
- git-committer:
- Edward Z. Yang <ezyang@mit.edu> (09/20/11 23:15:31)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
perl/modules/Facebook/lib/BarnOwl/Message/Facebook.pm
r24bd860 r3d10ed3 33 33 my $inst = shift; 34 34 my $filter; 35 # XXX I hope $filter isn't used for anything besides display purposes 35 36 if($inst) { 36 # XXX I hope $filter isn't used for anything besides display purposes 37 $filter = "facebook: " . $self->{name} . " " . $self->{postid}; 38 BarnOwl::command("filter", $filter, 39 qw{type ^facebook$ and name_id}, '^'.$self->{name_id}.'$', 40 qw{and postid}, '^'.$self->{postid}.'$'); 41 } else { 37 42 $filter = "facebook: " . $self->{name}; 38 43 BarnOwl::command("filter", $filter, 39 44 qw{type ^facebook$ and name_id}, '^'.$self->{name_id}.'$'); 40 } else {41 $filter = "facebook";42 45 } 43 46 return $filter;
Note: See TracChangeset
for help on using the changeset viewer.