diff options
Diffstat (limited to 'network/twitter-cmdline/https.patch')
-rw-r--r-- | network/twitter-cmdline/https.patch | 36 |
1 files changed, 36 insertions, 0 deletions
diff --git a/network/twitter-cmdline/https.patch b/network/twitter-cmdline/https.patch new file mode 100644 index 0000000000..79a3c76bc7 --- /dev/null +++ b/network/twitter-cmdline/https.patch @@ -0,0 +1,36 @@ +diff -Naur twitter-1.03.orig/Twitter.pm twitter-1.03/Twitter.pm +--- twitter-1.03.orig/Twitter.pm 2008-06-16 23:39:19.000000000 +0200 ++++ twitter-1.03/Twitter.pm 2009-04-06 16:30:59.000000000 +0200 +@@ -10,8 +10,8 @@ + # This package implements a twitter object that is + # used to connect to twitter, and "do stuff" + +-my $twitter_post = q{http://twitter.com/statuses/update.json}; +-my $twitter_friends_timeline = q{http://twitter.com/statuses/friends_timeline.rss}; ++my $twitter_post = q{https://twitter.com/statuses/update.json}; ++my $twitter_friends_timeline = q{https://twitter.com/statuses/friends_timeline.rss}; + + # Constructor. + # new ( <user>, <pass>, [cookie jar] ) +@@ -39,8 +39,8 @@ + $self->{ua}->timeout(10); + + # Basic auth is for the win. +- $self->{ua}->credentials( "www.twitter.com:80", "Twitter API", $u, $p ); +- $self->{ua}->credentials( "twitter.com:80", "Twitter API", $u, $p ); ++ $self->{ua}->credentials( "www.twitter.com:443", "Twitter API", $u, $p ); ++ $self->{ua}->credentials( "twitter.com:443", "Twitter API", $u, $p ); + + # It's fun to store our cookies. + $self->{ua}->cookie_jar( HTTP::Cookies->new( +diff -Naur twitter-1.03.orig/twitter.pl twitter-1.03/twitter.pl +--- twitter-1.03.orig/twitter.pl 2008-07-09 20:38:39.000000000 +0200 ++++ twitter-1.03/twitter.pl 2009-04-06 16:30:25.000000000 +0200 +@@ -12,7 +12,6 @@ + # Licensed under the GNU GPL v2. + + use strict; +-use lib '/home/gabriel/lib'; + use Data::Dumper; + use Getopt::Std; + use Twitter; |