Index: PV TBX Zaag.prj.xml
===================================================================
diff -u -r2812 -r2814
--- PV TBX Zaag.prj.xml	(.../PV TBX Zaag.prj.xml)	(revision 2812)
+++ PV TBX Zaag.prj.xml	(.../PV TBX Zaag.prj.xml)	(revision 2814)
@@ -1,6 +1,6 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="9">
-<Project name="PV TBX Zaag" LastModified="2011-11-11 15:51:18">
+<Project name="PV TBX Zaag" LastModified="2011-11-11 16:04:19">
   <Items>
     <ProjectItem name="APPS.Halux.Opvolging.AStilstandenLijstHelper" type="CLS"/>
     <ProjectItem name="APPS.Halux.Opvolging.IStilstanden" type="CLS"/>
@@ -44,6 +44,7 @@
     <ProjectItem name="BL.PPS.TBX.MultiProcessorEN" type="CLS"/>
     <ProjectItem name="BL.PPS.TBX.MultiProcessorOF" type="CLS"/>
     <ProjectItem name="BL.PPS.TBX.Sequencer" type="CLS"/>
+    <ProjectItem name="BL.Prod.ImageLinkImport" type="CLS"/>
     <ProjectItem name="BL.Sys.LabelPrinter" type="CLS"/>
     <ProjectItem name="CHUI.PPS.TBX.LeanBatch" type="CLS"/>
     <ProjectItem name="DOM.PM.TBXProduct.TBXBodem" type="CLS"/>
Index: vhDeploy/PV/Deploy20111111.cls.xml
===================================================================
diff -u
--- vhDeploy/PV/Deploy20111111.cls.xml	(revision 0)
+++ vhDeploy/PV/Deploy20111111.cls.xml	(revision 2814)
@@ -0,0 +1,18 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="vhDeploy.PV.Deploy20111111">
+<Description>
+Added by WimV </Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>svn.Deploy</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	do ##Class(TECH.PubSub.EventSubscription).%PurgeIndices()
+	do ##Class(TECH.PubSub.EventSubscription).%BuildIndices()
+]]></Implementation>
+</Method>
+</Class>
+</Export>
Index: TECH/PubSub/EventSubscription.cls.xml
===================================================================
diff -u -r1074 -r2814
--- TECH/PubSub/EventSubscription.cls.xml	(.../EventSubscription.cls.xml)	(revision 1074)
+++ TECH/PubSub/EventSubscription.cls.xml	(.../EventSubscription.cls.xml)	(revision 2814)
@@ -23,6 +23,11 @@
 <Properties>EventType</Properties>
 </Index>
 
+<Index name="Unique">
+<Properties>EventType,RespondingClass,RespondingMethod</Properties>
+<Unique>1</Unique>
+</Index>
+
 <Method name="%OnNew">
 <FormalSpec>EventType:%String,RespondingClass:%String,RespondingMethod:%String</FormalSpec>
 <Private>1</Private>