Changeset fb06a17 for perl/modules/Facebook/lib/BarnOwl/Message

Timestamp:

Sep 20, 2011, 11:15:32 PM (13 years ago)

Author:

Edward Z. Yang <ezyang@mit.edu>

Branches:

master, release-1.10, release-1.9

Children:

a7ac83a

Parents:

e1ed6f4

git-author:

Edward Z. Yang <ezyang@mit.edu> (06/23/11 22:47:15)

git-committer:

Edward Z. Yang <ezyang@mit.edu> (09/20/11 23:15:32)

Message:

Rename zsig to permalink.

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

File:

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

perl/modules/Facebook/lib/BarnOwl/Message/Facebook.pm

@@ -16 +16 @@
 sub subcontext { return shift->{"topic"}; }
 sub service { return "http://www.facebook.com"; }
-sub long_sender { return shift->{"zsig"}; } # XXX hack, shouldn't be named zsig
+sub long_sender { return shift->{"permalink"}; }
 
 sub replycmd {
     my $self = shift;
-    # TODO: Support for direct messages
-    # XXX: It seems that Facebook may not support this yet
     return BarnOwl::quote('facebook-comment', $self->{post_id});
 }
 
+# XXX Messaging not supported yet.
 #sub replysendercmd {
 #    my $self = shift;