0.15_05 commit

[bse.git] / site / cgi-bin / modules / BSE / Shop / Util.pm

diff --git a/site/cgi-bin/modules/BSE/Shop/Util.pm b/site/cgi-bin/modules/BSE/Shop/Util.pm
index 5b4bc8d80c800d55f5eee27e13b52a9451cd63d0..f433efab390c91d6a938cdbe04842bf4d2407e23 100644 (file)
--- a/site/cgi-bin/modules/BSE/Shop/Util.pm
+++ b/site/cgi-bin/modules/BSE/Shop/Util.pm
@@ -411,8 +411,16 @@ sub payment_types {
     $types{$type}{enabled} = 1;
   }
 
-  #use Data::Dumper;
-  #print STDERR Dumper \%types;
+  # credit card payments require either encrypted emails enabled or
+  # an online CC processing module
+  if ($types{0}) {
+    my $noencrypt = $cfg->entryBool('shop', 'noencrypt', 0);
+    my $ccprocessor = $cfg->entry('shop', 'cardprocessor');
+
+    if ($noencrypt && !$ccprocessor) {
+      $types{0}{enabled} = 0;
+    }
+  }
 
   return values %types;
 }