projects
/
twirssi-net-twitter-lite.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
af89546
)
r548 - Add new setting twirssi_always_shorten to force all URLs to be shortened
author
Dan Boger
<zigdon@irc.peeron.com>
Fri, 13 Mar 2009 17:46:02 +0000
(10:46 -0700)
committer
Dan Boger
<zigdon@irc.peeron.com>
Fri, 13 Mar 2009 17:46:02 +0000
(10:46 -0700)
twirssi.pl
patch
|
blob
|
history
diff --git
a/twirssi.pl
b/twirssi.pl
index fcf8b904847e396b07993a8a933105c18fe17f56..ced5f956938c6afc737599577e1e00d559c11412 100644
(file)
--- a/
twirssi.pl
+++ b/
twirssi.pl
@@
-12,7
+12,7
@@
$Data::Dumper::Indent = 1;
use vars qw($VERSION %IRSSI);
$VERSION = "2.1.3beta";
use vars qw($VERSION %IRSSI);
$VERSION = "2.1.3beta";
-my ($REV) = '$Rev: 54
7
$' =~ /(\d+)/;
+my ($REV) = '$Rev: 54
8
$' =~ /(\d+)/;
%IRSSI = (
authors => 'Dan Boger',
contact => 'zigdon@gmail.com',
%IRSSI = (
authors => 'Dan Boger',
contact => 'zigdon@gmail.com',
@@
-21,7
+21,7
@@
my ($REV) = '$Rev: 547 $' =~ /(\d+)/;
. 'Can optionally set your bitlbee /away message to same',
license => 'GNU GPL v2',
url => 'http://twirssi.com',
. 'Can optionally set your bitlbee /away message to same',
license => 'GNU GPL v2',
url => 'http://twirssi.com',
- changed => '$Date: 2009-03-13 10:
38:1
7 -0700 (Fri, 13 Mar 2009) $',
+ changed => '$Date: 2009-03-13 10:
45:4
7 -0700 (Fri, 13 Mar 2009) $',
);
my $window;
);
my $window;
@@
-1200,7
+1200,14
@@
sub shorten {
my $data = shift;
my $provider = Irssi::settings_get_str("short_url_provider");
my $data = shift;
my $provider = Irssi::settings_get_str("short_url_provider");
- if ( &too_long( $data, 1 ) and $provider ) {
+ if (
+ (
+ Irssi::settings_get_bool("twirssi_always_shorten")
+ or &too_long( $data, 1 )
+ )
+ and $provider
+ )
+ {
my @args;
if ( $provider eq 'Bitly' ) {
@args[ 1, 2 ] = split ',',
my @args;
if ( $provider eq 'Bitly' ) {
@args[ 1, 2 ] = split ',',
@@
-1267,6
+1274,7
@@
Irssi::settings_add_bool( "twirssi", "twirssi_replies_autonick", 1 );
Irssi::settings_add_bool( "twirssi", "twirssi_use_reply_aliases", 0 );
Irssi::settings_add_bool( "twirssi", "twirssi_notify_timeouts", 1 );
Irssi::settings_add_bool( "twirssi", "twirssi_hilights", 1 );
Irssi::settings_add_bool( "twirssi", "twirssi_use_reply_aliases", 0 );
Irssi::settings_add_bool( "twirssi", "twirssi_notify_timeouts", 1 );
Irssi::settings_add_bool( "twirssi", "twirssi_hilights", 1 );
+Irssi::settings_add_bool( "twirssi", "twirssi_always_shorten", 0 );
Irssi::settings_add_bool( "twirssi", "tweet_window_input", 0 );
$last_poll = time - &get_poll_time;
Irssi::settings_add_bool( "twirssi", "tweet_window_input", 0 );
$last_poll = time - &get_poll_time;