[Rt-commit] rt branch, 4.0/dont-cry-on-5.16, created. rt-4.0.5-135-gb55e3de

[Jesse Vincent]

The branch, 4.0/dont-cry-on-5.16 has been created
        at  b55e3de158e8cf1bd2253727ca74c7dcf3e5ded9 (commit)

- Log -----------------------------------------------------------------
commit b55e3de158e8cf1bd2253727ca74c7dcf3e5ded9
Author: Jesse Vincent <jesse at bestpractical.com>
Date:   Sun May 20 17:05:30 2012 -0300

    Perl 5.16 is much pickier about undef values being passed to the utf8 subs

diff --git a/lib/RT/Record.pm b/lib/RT/Record.pm
index 29cff47..2ccdad1 100644
--- a/lib/RT/Record.pm
+++ b/lib/RT/Record.pm
@@ -638,6 +638,8 @@ sub __Value {
 
     my $value = $self->SUPER::__Value($field);
 
+    return undef if (!defined $value);
+
     if ( $args{'decode_utf8'} ) {
         if ( !utf8::is_utf8($value) ) {
             utf8::decode($value);

-----------------------------------------------------------------------