Changeset 4839f5a


Ignore:
Timestamp:
Jun 23, 2011, 10:47:15 PM (6 years ago)
Author:
Edward Z. Yang <ezyang@mit.edu>
Children:
e458b63
Parents:
525dd8d
Message:
Rename zsig to permalink.

Signed-off-by: Edward Z. Yang <ezyang@mit.edu>
Location:
perl/modules/Facebook/lib/BarnOwl
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • perl/modules/Facebook/lib/BarnOwl/Message/Facebook.pm

    r6c3d4ad r4839f5a  
    1616sub subcontext { return shift->{"topic"}; }
    1717sub service { return "http://www.facebook.com"; }
    18 sub long_sender { return shift->{"zsig"}; } # XXX hack, shouldn't be named zsig
     18sub long_sender { return shift->{"permalink"}; }
    1919
    2020sub replycmd {
    2121    my $self = shift;
    22     # TODO: Support for direct messages
    23     # XXX: It seems that Facebook may not support this yet
    2422    return BarnOwl::quote('facebook-comment', $self->{post_id});
    2523}
    2624
     25# XXX Messaging not supported yet.
    2726#sub replysendercmd {
    2827#    my $self = shift;
  • perl/modules/Facebook/lib/BarnOwl/Module/Facebook/Handle.pm

    r525dd8d r4839f5a  
    307307                # serves as a canonical link to the post.  The {name}
    308308                # field should equal 'Comment'.
    309                 zsig      => $post->{actions}[0]{link},
     309                permalink => $post->{actions}[0]{link},
    310310               );
    311311            BarnOwl::queue_message($msg);
Note: See TracChangeset for help on using the changeset viewer.