From b695480291149cc3f9f9a9fda44c1cab28e2ab02 Mon Sep 17 00:00:00 2001
From: lars <lars@systemausfall.org>
Date: Sat, 11 Oct 2008 07:09:31 +0000
Subject: [PATCH] module Ezmlm::Mail::GpgEzmlm: * add a wrapper around
 "getconfig" to restore the config file before reading   the configuation

---
 Ezmlm/trunk/Ezmlm/GpgEzmlm.pm | 14 ++++++++++++++
 1 file changed, 14 insertions(+)

diff --git a/Ezmlm/trunk/Ezmlm/GpgEzmlm.pm b/Ezmlm/trunk/Ezmlm/GpgEzmlm.pm
index 9f99ff7..90797c5 100644
--- a/Ezmlm/trunk/Ezmlm/GpgEzmlm.pm
+++ b/Ezmlm/trunk/Ezmlm/GpgEzmlm.pm
@@ -475,6 +475,20 @@ getconfig() returns a hash including all available settings
 
 =cut
 
+# call the original 'getconfig' function after restoring the "normal" config
+# file (necessary only for ezmlm-idx < 0.4x)
+sub getconfig {
+	my $self = shift;
+
+	my ($result);
+
+	&_enable_plaintext_config_file($self->thislist());
+	$result = $self->SUPER::getconfig();
+	&_enable_encryption_config_file($self->thislist());
+
+	return $result;
+}
+
 # retrieve the specific configuration of the list
 sub getconfig_special {
 	my ($self) = @_;