X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=FS%2FFS%2Fpart_export%2Fhttp.pm;fp=FS%2FFS%2Fpart_export%2Fhttp.pm;h=0d62409fc73464894e8c28f3e3adfb8054517d5f;hb=9fa2bad9e9954ba0f838b032b4732de6847bb55b;hp=c35c89f121989c3548e5a937f7b576b6d9b0bceb;hpb=e0f4d7c4932871a17555b93ef2db49bc6c4c2d35;p=freeside.git

diff --git a/FS/FS/part_export/http.pm b/FS/FS/part_export/http.pm
index c35c89f12..0d62409fc 100644
--- a/FS/FS/part_export/http.pm
+++ b/FS/FS/part_export/http.pm
@@ -33,6 +33,18 @@ tie %options, 'Tie::IxHash',
     default => join("\n",
     ),
   },
+  'suspend_data' => {
+    label   => 'Suspend data',
+    type    => 'textarea',
+    default => join("\n",
+    ),
+  },
+  'unsuspend_data' => {
+    label   => 'Unsuspend data',
+    type    => 'textarea',
+    default => join("\n",
+    ),
+  },
   'success_regexp' => {
     label  => 'Success Regexp',
     default => '',
@@ -64,6 +76,16 @@ sub _export_delete {
   $self->_export_command('delete', @_);
 }
 
+sub _export_suspend {
+  my $self = shift;
+  $self->_export_command('suspend', @_);
+}
+
+sub _export_unsuspend {
+  my $self = shift;
+  $self->_export_command('unsuspend', @_);
+}
+
 sub _export_command {
   my( $self, $action, $svc_x ) = ( shift, shift, shift );