X-Git-Url: https://git.camperquake.de/gitweb.cgi?p=quotesite.git;a=blobdiff_plain;f=quotesite%2FTwitterGrabber.pm;h=ef4887a248129c26ec9f8edfbba7c87b4308c6fc;hp=286b96260a8c3b3b1cd6be4b25ef1b0951293f09;hb=18eb17221c111a8442538c54d2527e8c06b25803;hpb=54cdc91228ff95d3b0407baa00adc215272c24a0

diff --git a/quotesite/TwitterGrabber.pm b/quotesite/TwitterGrabber.pm
index 286b962..ef4887a 100644
--- a/quotesite/TwitterGrabber.pm
+++ b/quotesite/TwitterGrabber.pm
@@ -3,10 +3,10 @@
 #
 # Grabber for twitter
 
-package TwitterGrabber;
+package quotesite::TwitterGrabber;
 
-use GrabberBase;
-@ISA = qw(GrabberBase);
+use quotesite::GrabberBase;
+@ISA = qw(quotesite::GrabberBase);
 
 use LWP::Simple qw(!get);
 use Data::Dumper;
@@ -21,7 +21,7 @@ sub new {
     my $self = $class->SUPER::new();
 
     $self->{'NAME'} = 'twitter.com';
-    $self->{'PATTERNS'} = ['(http://twitter.com/(?:\#\!/)?[^/]+/status(?:es)?/(\d+))'];
+    $self->{'PATTERNS'} = ['(https?://twitter.com/(?:\#\!/)?[^/]+/status(?:es)?/(\d+))'];
 
     bless($self, $class);
     $self->_prepare_parameters();
@@ -58,7 +58,7 @@ sub _parse {
         return undef;
     }
 
-    $metadata->{'CONTENT'} = encode("utf8", decode_entities(decode("utf8", $t->{'text'})));
+    $metadata->{'CONTENT'} = decode_entities($t->{'text'});
     $metadata->{'ID'} = $t->{'user'}->{'screen_name'} . '/' . $metadata->{'ID'};
 
     unless(defined($metadata->{'CONTENT'})) {