summaryrefslogtreecommitdiff
path: root/network
diff options
context:
space:
mode:
Diffstat (limited to 'network')
-rw-r--r--network/twitter-cmdline/https.patch36
-rw-r--r--network/twitter-cmdline/https.patch.gzbin620 -> 0 bytes
-rw-r--r--network/twitter-cmdline/twitter-cmdline.SlackBuild2
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
deleted file mode 100644
index 6318a830bc..0000000000
--- a/network/twitter-cmdline/https.patch.gz
+++ /dev/null
Binary files differ
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/