sub _load_reference_if_you_need { # {{{ if ($reference) { # Reference already loaded or initialized. return $reference; } # Is there a reference file? if (not -f $default_reference_filename) { # Nope. Warn the User, but don't make a tragedy of it. diag("No reference file found. All calls to is_referenced_ok WILL fail."); return $reference = {}; } return $reference = $serializer_load->($default_reference_filename); }