summaryrefslogtreecommitdiffstats
path: root/network/twitter-cmdline/https.patch
diff options
context:
space:
mode:
Diffstat (limited to 'network/twitter-cmdline/https.patch')
-rw-r--r--network/twitter-cmdline/https.patch36
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;