From 9334e9215f704ea4bc60f952da57df069d3bcf68 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Tue, 7 Oct 2003 05:50:02 +0000
Subject: add suspend and unsuspend hooks, don't try and set '*SUSPENDED*'
 passwords

---
 FS/FS/part_export/communigate_pro.pm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/FS/FS/part_export/communigate_pro.pm b/FS/FS/part_export/communigate_pro.pm
index 35c7fbf41..a9d9591ca 100644
--- a/FS/FS/part_export/communigate_pro.pm
+++ b/FS/FS/part_export/communigate_pro.pm
@@ -39,6 +39,8 @@ sub _export_replace {
                 || $old->finger ne $new->finger
                 || $old->quota ne $new->quota;
 
+  return '' if '*SUSPENDED* '. $old->_password eq $new->_password;
+
   #my $err_or_queue = $self->communigate_pro_queue( $new->svcnum,'RenameAccount',
   #  $old->email, $new->email );
   #return $err_or_queue unless ref($err_or_queue);
-- 
cgit v1.2.1