Fix bug where hash keys are not properly escaped in uneval.

Fix bug where hash keys don't get properly escaped in uneval resulting in code
that fails when an eval or reval attempt is made.

lib/Vend/Util.pm

@@ -655,6 +655,7 @@ sub uneval_it {
     } elsif ($r eq 'HASH') {
 	$s = "{";
 	while (($key, $value) = each %$o) {
+	    $key =~ s/(['\\])/\\$1/g;
 	    $s .= "'$key' => " . uneval_it($value) . ",";
 	}
 	$s .= "}";