sub LOGifError {
    my ($o, $what, $err) = @_;
    $o->LOG('error', "$what: $error") if $error;
  }

##</code><code>##

  $o->LOGifError($tree, $@);

##</code><code>##

  if ($@) {
     $o->LOG('error', "$tree: $@");
  }

##</code><code>##

  $o->LOG('error', "$tree: $@") if $@;