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:
489e5ba
)
r491 - Add a new setting, twirssi_upgrade_beta. If true, will upgrade from git....
author
Dan Boger
<zigdon@irc.peeron.com>
Wed, 25 Feb 2009 18:44:56 +0000
(10:44 -0800)
committer
Dan Boger
<zigdon@irc.peeron.com>
Wed, 25 Feb 2009 18:44:56 +0000
(10:44 -0800)
twirssi.pl
patch
|
blob
|
history
diff --git
a/twirssi.pl
b/twirssi.pl
index 2af86fc49f1e0071b5f8e67918f17f63382f1652..0ee8ab107f96a7384b6a6e25f54447685434fb0d 100644
(file)
--- a/
twirssi.pl
+++ b/
twirssi.pl
@@
-11,8
+11,8
@@
$Data::Dumper::Indent = 1;
use vars qw($VERSION %IRSSI);
use vars qw($VERSION %IRSSI);
-$VERSION = "2.1.1";
-my ($REV) = '$Rev: 49
0
$' =~ /(\d+)/;
+$VERSION = "2.1.1
beta
";
+my ($REV) = '$Rev: 49
1
$' =~ /(\d+)/;
%IRSSI = (
authors => 'Dan Boger',
contact => 'zigdon@gmail.com',
%IRSSI = (
authors => 'Dan Boger',
contact => 'zigdon@gmail.com',
@@
-21,7
+21,7
@@
my ($REV) = '$Rev: 490 $' =~ /(\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-02-25 10:
21:27
-0800 (Wed, 25 Feb 2009) $',
+ changed => '$Date: 2009-02-25 10:
44:26
-0800 (Wed, 25 Feb 2009) $',
);
my $window;
);
my $window;
@@
-505,7
+505,7
@@
sub cmd_upgrade {
}
my $md5;
}
my $md5;
- unless (
$data
) {
+ unless (
$data or Irssi::settings_get_bool("twirssi_upgrade_beta")
) {
eval { use Digest::MD5; };
if ($@) {
eval { use Digest::MD5; };
if ($@) {
@@
-539,7
+539,10
@@
sub cmd_upgrade {
}
}
}
}
- my $URL = "http://twirssi.com/twirssi.pl";
+ my $URL =
+ Irssi::settings_get_bool("twirssi_upgrade_beta")
+ ? "http://github.com/zigdon/twirssi/raw/master/twirssi.pl"
+ : "http://twirssi.com/twirssi.pl";
¬ice("Downloading twirssi from $URL");
LWP::Simple::getstore( $URL, "$loc.upgrade" );
¬ice("Downloading twirssi from $URL");
LWP::Simple::getstore( $URL, "$loc.upgrade" );
@@
-1192,6
+1195,7
@@
Irssi::settings_add_str( "twirssi", "twirssi_replies_store",
".irssi/scripts/twirssi.json" );
Irssi::settings_add_str( "twirssi", "twirssi_nick_color", "%B" );
Irssi::settings_add_str( "twirssi", "twirssi_topic_color", "%r" );
".irssi/scripts/twirssi.json" );
Irssi::settings_add_str( "twirssi", "twirssi_nick_color", "%B" );
Irssi::settings_add_str( "twirssi", "twirssi_topic_color", "%r" );
+Irssi::settings_add_bool( "twirssi", "twirssi_upgrade_beta", 0 );
Irssi::settings_add_bool( "twirssi", "tweet_to_away", 0 );
Irssi::settings_add_bool( "twirssi", "show_reply_context", 0 );
Irssi::settings_add_bool( "twirssi", "show_own_tweets", 1 );
Irssi::settings_add_bool( "twirssi", "tweet_to_away", 0 );
Irssi::settings_add_bool( "twirssi", "show_reply_context", 0 );
Irssi::settings_add_bool( "twirssi", "show_own_tweets", 1 );