X-Git-Url: http://lab.mitty.jp/git/?a=blobdiff_plain;f=Dev%2Ftwitter%2Fshow_status.pl;h=0d2ecac6522d03788ab7f97106b470280f458246;hb=HEAD;hp=5c22a926c834a8ed51a42e114f9ce79a37989071;hpb=a5b6bf1b18c7adf5e32cc0e020e76b26272902af;p=lab.git

diff --git a/Dev/twitter/show_status.pl b/Dev/twitter/show_status.pl
index 5c22a92..0d2ecac 100755
--- a/Dev/twitter/show_status.pl
+++ b/Dev/twitter/show_status.pl
@@ -9,10 +9,10 @@ use utf8;
 # it throws a Net::Twitter::Lite::Error object. 
 # You can catch and process these exceptions by using eval blocks and testing $@
 ## from http://search.cpan.org/perldoc?Net::Twitter::Lite#ERROR_HANDLING
-use Net::Twitter::Lite;
+use Net::Twitter::Lite::WithAPIv1_1;
 use Data::Dumper;
 
-my $bot = Net::Twitter::Lite->new(
+my $bot = Net::Twitter::Lite::WithAPIv1_1->new(
     legacy_lists_api => 0,
 );