File twitter-cmdline.patch of Package twitter-cmdline

--- twitter.pl.orig	2008-07-09 20:38:39.000000000 +0200
+++ twitter.pl	2010-03-02 23:12:20.000000000 +0100
@@ -12,20 +12,15 @@
 # Licensed under the GNU GPL v2.
 
 use strict;
-use lib '/home/gabriel/lib';
 use Data::Dumper;
 use Getopt::Std;
-use Twitter;
+use Twitter::Cmdline;
 
 # optionally support curses
 eval { use Term::ANSIColor qw(:constants); $Term::ANSIColor::AUTORESET = 1; };
 
 my $colorEnabled = ($@ ) ? 0 : 1;
 
-if( $colorEnabled ) {
-	print BLUE, "\t\t\t *** ANSI COLOR ENABLED ***\n", RESET;
-}
-
 # Set our options
 # -f = alternate config file
 # -d = Remove last twitter
@@ -116,7 +111,7 @@
 }
 
 my $res;
-my $T = new Twitter( $tw_user, $tw_pass );
+my $T = new Twitter::Cmdline( $tw_user, $tw_pass );
 die("Object couldn't be made\n") unless $T;
 
 if( $o{r}) {
--- Twitter.pm.orig	2008-06-16 23:39:19.000000000 +0200
+++ Twitter.pm	2010-03-02 23:11:50.000000000 +0100
@@ -1,7 +1,7 @@
 # Written by Gabriel Cain, <gabriel@dreamingcrow.com>
 # Licensed under the GNU GPL v2.
 
-package Twitter;
+package Twitter::Cmdline;
 
 use strict;
 use LWP::UserAgent;
openSUSE Build Service is sponsored by