--- rxvt-unicode/src/urxvt.pm	2021/07/24 12:17:08	1.267
+++ rxvt-unicode/src/urxvt.pm	2021/11/21 15:15:02	1.269
@@ -825,8 +825,6 @@
       warn $@ if $@;
    }
 
-   $retval = undef;
-
    if ($htype == HOOK_OSC_SEQ) {
       if (my $exts = delete $TERM->{meta}{autoload_osc}{$_[0]}) {
          $TERM->autoload_extension ($_->[0]) for @$exts;
@@ -837,6 +835,8 @@
       }
    }
 
+   $retval = undef;
+
    if (my $cb = $TERM->{_hook}[$htype]) {
       verbose 10, "$HOOKNAME[$htype] (" . (join ", ", $TERM, @_) . ")"
          if $verbosity >= 10;
@@ -1627,11 +1627,13 @@
 
 =item $octets = $term->locale_encode ($string)
 
-Convert the given text string into the corresponding locale encoding.
+Convert the given text string into the corresponding locale
+encoding. Returns C<undef> if C<$string> is C<undef>.
 
 =item $string = $term->locale_decode ($octets)
 
-Convert the given locale-encoded octets into a perl string.
+Convert the given locale-encoded octets into a perl string. Returns
+C<undef> if C<$octets> is C<undef>.
 
 =item $term->scr_xor_span ($beg_row, $beg_col, $end_row, $end_col[, $rstyle])