Changeset a98e071 for perl/modules/Facebook/lib/BarnOwl

Timestamp:

Sep 19, 2011, 1:31:34 PM (13 years ago)

Author:

Edward Z. Yang <ezyang@mit.edu>

Children:

4724f1a

Parents:

61d7594

git-author:

Edward Z. Yang <ezyang@mit.edu> (06/20/11 12:36:17)

git-committer:

Edward Z. Yang <ezyang@mit.edu> (09/19/11 13:31:34)

Message:

Suppress interest groups for now.

Signed-off-by: Edward Z. Yang <ezyang@mit.edu>

File:

• perl/modules/Facebook/lib/BarnOwl/Module/Facebook/Handle.pm (modified) (1 diff)

perl/modules/Facebook/lib/BarnOwl/Module/Facebook/Handle.pm

@@ -184 +184 @@
         # No app invites, thanks! (XXX make configurable)
         if ($post->{type} eq 'link' && $post->{application}) {
+            next;
+        }
+
+        # XXX Filtering out interest groups for now
+        # A more reasonable strategy may be to show their
+        # posts, but not the comments.
+        if (defined $post->{from}{category}) {
             next;
         }