HTTP::Body 1.05, removed useless use of eval/require in new()

diff --git a/Changes b/Changes
index f65b6ed..27e4208 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,5 +1,8 @@
 This file documents the revision history for Perl extension HTTP::Body.
 
+1.05    2008-12-01 17:15:00
+        - Removed useless eval + require in new().
+
 1.04    2008-06-23 16:00:00
         - Added tmpdir() accessor to specify an alternate directory for temp files.
           (jgoulah)

diff --git a/lib/HTTP/Body.pm b/lib/HTTP/Body.pm
index 12216d6..459387c 100644 (file)
--- a/lib/HTTP/Body.pm
+++ b/lib/HTTP/Body.pm
@@ -4,7 +4,7 @@ use strict;
 
 use Carp       qw[ ];
 
-our $VERSION = '1.04';
+our $VERSION = '1.05';
 
 our $TYPES = {
     'application/octet-stream'          => 'HTTP::Body::OctetStream',
@@ -97,12 +97,6 @@ sub new {
 
     my $body = $TYPES->{ $type || 'application/octet-stream' };
 
-    eval "require $body";
-
-    if ($@) {
-        die $@;
-    }
-
     my $self = {
         buffer         => '',
         chunk_buffer   => '',