Index: AAPClient/UI/PopupScherm.pas
===================================================================
diff -u -r144 -r145
--- AAPClient/UI/PopupScherm.pas	(.../PopupScherm.pas)	(revision 144)
+++ AAPClient/UI/PopupScherm.pas	(.../PopupScherm.pas)	(revision 145)
@@ -64,7 +64,7 @@
 
 procedure TfmPopupScherm.lblActie1Click(Sender: TObject);
 begin
-  ModalResult := mrNo;
+  ModalResult := mrYes;
   CloseModal;
 end;