use vars qw($VERSION %IRSSI);
-$VERSION = "1.7.4";
-my ($REV) = '$Rev: 358 $' =~ /(\d+)/;
+$VERSION = "1.7.6";
+my ($REV) = '$Rev: 379 $' =~ /(\d+)/;
%IRSSI = (
authors => 'Dan Boger',
contact => 'zigdon@gmail.com',
. 'Can optionally set your bitlbee /away message to same',
license => 'GNU GPL v2',
url => 'http://tinyurl.com/twirssi',
- changed => '$Date: 2009-01-13 21:02:17 -0800 (Tue, 13 Jan 2009) $',
+ changed => '$Date: 2009-01-21 09:50:42 -0800 (Wed, 21 Jan 2009) $',
);
my $window;
unless ( ref $tweets ) {
if ( $obj->can("get_error") ) {
+ my $error;
+ eval { $error = JSON::Any->jsonToObj( $obj->get_error() ) };
+ if ($@) { $error = $obj->get_error() }
print $fh "type:debug API Error during friends_timeline call: ",
- JSON::Any->jsonToObj( $obj->get_error() ), " Aborted.\n";
+ "$error Aborted.\n";
} else {
print $fh
"type:debug API Error during friends_timeline call. Aborted.\n";
foreach my $t ( reverse @$tweets ) {
my $text = decode_entities( $t->{text} );
- $text =~ s/(^|\W)\@([-\w]+)/$1\cC12\@$2\cC/g;
+ $text =~ s/(^|\W)\@([-\w]+)/$1\cC12\@$2\cO/g;
$text =~ s/[\n\r]/ /g;
my $reply = "tweet";
if ( Irssi::settings_get_bool("show_reply_context")
if ($context) {
my $ctext = decode_entities( $context->{text} );
- $ctext =~ s/(^|\W)\@([-\w]+)/$1\cC12\@$2\cC/g;
+ $ctext =~ s/(^|\W)\@([-\w]+)/$1\cC12\@$2\cO/g;
$ctext =~ s/[\n\r]/ /g;
printf $fh "id:%d account:%s nick:%s type:tweet %s\n",
$context->{id}, $username,
if exists $friends{ $t->{user}{screen_name} };
my $text = decode_entities( $t->{text} );
- $text =~ s/(^|\W)\@([-\w]+)/$1\cC12\@$2\cC/g;
+ $text =~ s/(^|\W)\@([-\w]+)/$1\cC12\@$2\cO/g;
$text =~ s/[\n\r]/ /g;
printf $fh "id:%d account:%s nick:%s type:tweet %s\n",
$t->{id}, $username, $t->{user}{screen_name}, $text;
foreach my $t ( reverse @$tweets ) {
my $text = decode_entities( $t->{text} );
- $text =~ s/(^|\W)\@([-\w]+)/$1\cC12\@$2\cC/g;
+ $text =~ s/(^|\W)\@([-\w]+)/$1\cC12\@$2\cO/g;
$text =~ s/[\n\r]/ /g;
printf $fh "id:%d account:%s nick:%s type:dm %s\n",
$t->{id}, $username, $t->{sender_screen_name}, $text;
and $linestart =~ /^\/reply(?:_as)?\s*$/ )
)
{ # /twitter_reply gets a nick:num
- @$complist = grep /^\Q$word/i, sort keys %{ $id_map{__indexes} };
+ $word =~ s/^@//;
+ @$complist = map { "$_:$id_map{__indexes}{$_}" } grep /^\Q$word/i,
+ sort keys %{ $id_map{__indexes} };
}
# /tweet, /tweet_as, /dm, /dm_as - complete @nicks (and nicks as the first
Irssi::settings_add_bool( "twirssi", "tweet_window_input", 0 );
$window = Irssi::window_find_name( Irssi::settings_get_str('twitter_window') );
+if (!$window) {
+ $window = Irssi::Windowitem::window_create (Irssi::settings_get_str('twitter_window'), 1);
+ $window->set_name (Irssi::settings_get_str('twitter_window'));
+}
+
if ($window) {
Irssi::command_bind( "dm", "cmd_direct" );
Irssi::command_bind( "dm_as", "cmd_direct_as" );
. " or change the value of twitter_window. Then, reload twirssi." );
}
+# vim: set sts=4 expandtab: