Changeset 24662

Show
Ignore:
Timestamp:
11/23/08 01:08:19 (7 weeks ago)
Author:
haoyayoi
Message:

delete unnecessary file and fix function.

Location:
lang/perl/WWW-Slmame
Files:
1 removed
1 modified

Legend:

Unmodified
Added
Removed
  • lang/perl/WWW-Slmame/trunk/lib/WWW/Slmame.pm

    r24642 r24662  
    77use Encode::Guess qw/shift-jis euc-jp 7bit-jis/; 
    88use WWW::Mechanize; 
    9 our $VERSION = '0.01'; 
     9our $VERSION = '0.02'; 
    1010 
    1111sub new{ 
     
    3939sub _decode_utf8{ 
    4040    my $self    = shift; 
    41     my $message = $self->{message}; 
     41    my $message = shift; 
    4242    my $decodes = Encode::Guess->guess($message); 
    4343    ref($decodes) || die "Can't guess: $decodes";