[MKDoc-commit] turn-off uninitialised value in split/join warnings

bruno at mkdoc.demon.co.uk bruno at mkdoc.demon.co.uk
Thu Feb 3 15:24:00 GMT 2005


Log Message:
-----------
turn-off uninitialised value in split/join warnings

Modified Files:
--------------
    MKDoc-Apache_Cache/lib/MKDoc:
        Apache_Cache.pm

-------------- next part --------------
Index: Apache_Cache.pm
===================================================================
RCS file: /var/spool/cvs/MKDoc-Apache_Cache/lib/MKDoc/Apache_Cache.pm,v
retrieving revision 1.15
retrieving revision 1.16
diff -Llib/MKDoc/Apache_Cache.pm -Llib/MKDoc/Apache_Cache.pm -u -r1.15 -r1.16
--- lib/MKDoc/Apache_Cache.pm
+++ lib/MKDoc/Apache_Cache.pm
@@ -221,8 +221,10 @@
 sub _make_cache_friendly
 {
     my $buf = shift;
+    $buf ||= '';
     my ($headers, $body) = split /\r?\n\r?\n/, $buf, 2;
-    $body = '' unless ($body);
+    $headers ||= '';
+    $body ||= '';
     my @o = ();
 
     # Figure out some kind of content_type


More information about the MKDoc-commit mailing list