Minor bug fix, spotted by Jeff.

diff --git a/FS/FS/part_export/domreg_net_dri.pm b/FS/FS/part_export/domreg_net_dri.pm
index 885d6b6..d25945d 100644 (file)
--- a/FS/FS/part_export/domreg_net_dri.pm
+++ b/FS/FS/part_export/domreg_net_dri.pm
@@ -438,7 +438,7 @@ sub get_status {
   };
 #  rslt->{'message'} = $@->as_string if $@;
   if ($@) {
-    rslt->{'message'} = (UNIVERSAL::isa($@, 'Net::DRI::Exception')) ? $@->as_string : $@->message;
+    $rslt->{'message'} = (UNIVERSAL::isa($@, 'Net::DRI::Exception')) ? $@->as_string : $@->message;
   }
 
   return $rslt; # Success