Changeset 834dc31


Ignore:
Timestamp:
Aug 20, 2017, 5:53:43 PM (7 years ago)
Author:
Alex Dehnert <adehnert@mit.edu>
Children:
40def31a
Parents:
1f69b54
Message:
Add tweet URL to the "i" popup

AFAICT, the info popup just shows the attributes of the perl message object, so
we set an otherwise-unused "url" attribute on the message. Sadly, I don't think
there's a mechanism for displaying the return value of a method instead.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • perl/modules/Twitter/lib/BarnOwl/Module/Twitter/Handle.pm

    r140429f r834dc31  
    290290            $orig = $tweet unless defined($orig);
    291291
     292            my $url = $self->{cfg}->{service} . '/' . $orig->{user}{screen_name} . '/status/' . $tweet->{id};
    292293            my $msg = BarnOwl::Message->new(
    293294                type      => 'Twitter',
     
    299300                body      => decode_entities($orig->{text}),
    300301                status_id => $tweet->{id},
     302                url       => $url,
    301303                service   => $self->{cfg}->{service},
    302304                account   => $self->{cfg}->{account_nickname},
Note: See TracChangeset for help on using the changeset viewer.