From 44395102c7cc0a2b49d075ea8ec9573e499d4214 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Sun, 3 Aug 2008 00:27:50 +0000
Subject: [PATCH] attempt to eliminate 'Can't call method "exists" on an
 undefined value at /usr/local/share/perl/5.8.8/FS/Record.pm line 812.' error
 on upgrade

---
 FS/FS/Record.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/FS/FS/Record.pm b/FS/FS/Record.pm
index 65bd8270f..8bd57ebff 100644
--- a/FS/FS/Record.pm
+++ b/FS/FS/Record.pm
@@ -1306,7 +1306,7 @@ sub _h_statement {
 
   # If we're encrypting then don't ever store the payinfo or CVV2 in the history....
   # You can see if it changed by the paymask...
-  if ($conf->exists('encryption') ) {
+  if ($conf && $conf->exists('encryption') ) {
     @fields = grep  $_ ne 'payinfo' && $_ ne 'cvv2', @fields;
   }
   my @values = map { _quote( $self->getfield($_), $self->table, $_) } @fields;
-- 
2.11.0