diff options
-rw-r--r-- | network/twitter-cmdline/https.patch | 36 | ||||
-rw-r--r-- | network/twitter-cmdline/https.patch.gz | bin | 620 -> 0 bytes | |||
-rw-r--r-- | network/twitter-cmdline/twitter-cmdline.SlackBuild | 2 |
3 files changed, 37 insertions, 1 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; diff --git a/network/twitter-cmdline/https.patch.gz b/network/twitter-cmdline/https.patch.gz Binary files differdeleted file mode 100644 index 6318a830bc..0000000000 --- a/network/twitter-cmdline/https.patch.gz +++ /dev/null diff --git a/network/twitter-cmdline/twitter-cmdline.SlackBuild b/network/twitter-cmdline/twitter-cmdline.SlackBuild index 3b766a90c3..5445d86e0a 100644 --- a/network/twitter-cmdline/twitter-cmdline.SlackBuild +++ b/network/twitter-cmdline/twitter-cmdline.SlackBuild @@ -73,7 +73,7 @@ find . \ # I do not like the http-only approach: switch to https-only. # If you prefer cleartext authentication, feel free to comment this out. -zcat $CWD/https.patch.gz | patch -p1 +patch -p1 < $CWD/https.patch install -d $PKG/usr/bin/ $PKG/usr/lib$LIBDIRSUFFIX/perl5/vendor_perl/5.10.0/ install -m 0644 Twitter.pm $PKG/usr/lib$LIBDIRSUFFIX/perl5/vendor_perl/5.10.0/ |