From 69f1a446226ef90ba2818bf617b23207f1b6c5d2 Mon Sep 17 00:00:00 2001
From: "Jan M. Hochstein" <jan@altaroca.com>
Date: Fri, 8 Aug 2014 18:47:52 +0200
Subject: [PATCH] Removed references to analytics

---
 onvif/modules/lib/ONVIF/Client.pm | 16 ++++++----------
 1 file changed, 6 insertions(+), 10 deletions(-)

diff --git a/onvif/modules/lib/ONVIF/Client.pm b/onvif/modules/lib/ONVIF/Client.pm
index c24c5fb67..a5ed8326f 100644
--- a/onvif/modules/lib/ONVIF/Client.pm
+++ b/onvif/modules/lib/ONVIF/Client.pm
@@ -36,8 +36,8 @@ require WSSecurity::SecuritySerializer;
 require ONVIF::Device::Interfaces::Device::DevicePort;
 require ONVIF::Media::Interfaces::Media::MediaPort;
 require ONVIF::PTZ::Interfaces::PTZ::PTZPort;
-require ONVIF::Analytics::Interfaces::Analytics::AnalyticsEnginePort;
-require ONVIF::Analytics::Interfaces::Analytics::RuleEnginePort;
+
+require WSNotification::Interfaces::WSBaseNotification::NotificationProducerPort;
 
 use Data::Dump qw(dump);
 
@@ -54,6 +54,7 @@ my %namespace_map = (
   'http://www.onvif.org/ver10/events/wsdl'      => 'events', 
   'http://www.onvif.org/ver10/recording.wsdl'   => 'recording',
   'http://www.onvif.org/ver10/search.wsdl'      => 'search',
+  'http://www.onvif.org/ver10/replay/wsdl'      => 'replay',
 );
 
 # ========================================================================
@@ -222,14 +223,9 @@ sub create_services
 #      transport => $transport
     }));
   }
-  if(defined $self->service('analytics', 'url'))  {
-    $self->set_service('analytics', 'ep', ONVIF::Analytics::Interfaces::Analytics::AnalyticsEnginePort->new({
-      proxy => $self->service('analytics', 'url'),
-      serializer => $self->serializer(),
-#      transport => $transport
-    }));
-    $self->set_service('rules', 'ep', ONVIF::Analytics::Interfaces::Analytics::RuleEnginePort->new({
-      proxy => $self->service('analytics', 'url'),
+  if(defined $self->service('events', 'url'))  {
+    $self->set_service('events', 'ep', WSNotification::Interfaces::WSBaseNotification::NotificationProducerPort->new({
+      proxy => $self->service('events', 'url'),
       serializer => $self->serializer(),
 #      transport => $transport
     }));