Index: vhLib/TerminalDevice.cls.xml
===================================================================
diff -u -r3916 -r3918
--- vhLib/TerminalDevice.cls.xml	(.../TerminalDevice.cls.xml)	(revision 3916)
+++ vhLib/TerminalDevice.cls.xml	(.../TerminalDevice.cls.xml)	(revision 3918)
@@ -61,7 +61,6 @@
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	#dim result As %String = $$$TextBetween(Toestel,"|TNT|","_")
-	Do ##class(Tools.Wlip).%New(207).String("init from clientname?" _ ##class(TECH.Context.RuntimeContext).Instance().GeefComputerNaam())
 	Set result = $Select(result["-":$Piece(result,"-",1),1:result)
 	If (result = "WS001") {
 		Set result = "ash"