--- lib/MIME/Parser.pm.orig	2007-06-04 17:46:15.000000000 -0700
+++ lib/MIME/Parser.pm	2007-06-04 17:47:11.000000000 -0700
@@ -818,7 +818,10 @@
 	    return 1;
 	}
 	else {           ### boojum
-	    $self->whine("while hunting for uuencode: $@");
+	    if (defined($@) && $@) {
+                ## 20070604EH: only whine if we have something to whine about
+	        $self->whine("while hunting for uuencode: $@");
+            }
 	    $ENCODED->seek(0,0) or die "$ME: can't seek: $!";
 	}
     }