[Catalyst-commits] r8680 - in trunk/HTTP-Body: . lib/HTTP

andyg at dev.catalyst.perl.org andyg at dev.catalyst.perl.org
Mon Dec 1 22:13:45 GMT 2008


Author: andyg
Date: 2008-12-01 22:13:44 +0000 (Mon, 01 Dec 2008)
New Revision: 8680

Modified:
   trunk/HTTP-Body/Changes
   trunk/HTTP-Body/lib/HTTP/Body.pm
Log:
HTTP::Body 1.05, removed useless use of eval/require in new()

Modified: trunk/HTTP-Body/Changes
===================================================================
--- trunk/HTTP-Body/Changes	2008-12-01 22:10:56 UTC (rev 8679)
+++ trunk/HTTP-Body/Changes	2008-12-01 22:13:44 UTC (rev 8680)
@@ -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)

Modified: trunk/HTTP-Body/lib/HTTP/Body.pm
===================================================================
--- trunk/HTTP-Body/lib/HTTP/Body.pm	2008-12-01 22:10:56 UTC (rev 8679)
+++ trunk/HTTP-Body/lib/HTTP/Body.pm	2008-12-01 22:13:44 UTC (rev 8680)
@@ -4,7 +4,7 @@
 
 use Carp       qw[ ];
 
-our $VERSION = '1.04';
+our $VERSION = '1.05';
 
 our $TYPES = {
     'application/octet-stream'          => 'HTTP::Body::OctetStream',
@@ -97,12 +97,6 @@
 
     my $body = $TYPES->{ $type || 'application/octet-stream' };
 
-    eval "require $body";
-
-    if ($@) {
-        die $@;
-    }
-
     my $self = {
         buffer         => '',
         chunk_buffer   => '',




More information about the Catalyst-commits mailing list