TD Präfix

hpi-swa-teaching · Jul 26, 2019 · 9b6155d · 9b6155d
1 parent 5675868
commit 9b6155d
Show file tree

Hide file tree

Showing 420 changed files with 139 additions and 139 deletions.
diff --git a/.../TD_TelegramContactWindow.class/README.md → ...e/TDTelegramContactWindow.class/README.md b/.../TD_TelegramContactWindow.class/README.md → ...e/TDTelegramContactWindow.class/README.md
diff --git a/...tactWindow.class/class/newWithBackend..st → ...tactWindow.class/class/newWithBackend..st b/...tactWindow.class/class/newWithBackend..st → ...tactWindow.class/class/newWithBackend..st
diff --git a/...mContactWindow.class/instance/addUser..st → ...mContactWindow.class/instance/addUser..st b/...mContactWindow.class/instance/addUser..st → ...mContactWindow.class/instance/addUser..st
diff --git a/...mContactWindow.class/instance/backend..st → ...mContactWindow.class/instance/backend..st b/...mContactWindow.class/instance/backend..st → ...mContactWindow.class/instance/backend..st
diff --git a/...amContactWindow.class/instance/backend.st → ...amContactWindow.class/instance/backend.st b/...amContactWindow.class/instance/backend.st → ...amContactWindow.class/instance/backend.st
diff --git a/...w.class/instance/buildContactListWith..st → ...w.class/instance/buildContactListWith..st b/...w.class/instance/buildContactListWith..st → ...w.class/instance/buildContactListWith..st
diff --git a/...ss/instance/buildCreateChatButtonWith..st → ...ss/instance/buildCreateChatButtonWith..st b/...ss/instance/buildCreateChatButtonWith..st → ...ss/instance/buildCreateChatButtonWith..st
diff --git a/...ontactWindow.class/instance/buildWith..st → ...ontactWindow.class/instance/buildWith..st b/...ontactWindow.class/instance/buildWith..st → ...ontactWindow.class/instance/buildWith..st
diff --git a/...gramContactWindow.class/instance/close.st → ...gramContactWindow.class/instance/close.st b/...gramContactWindow.class/instance/close.st → ...gramContactWindow.class/instance/close.st
diff --git a/...tactWindow.class/instance/contactNames.st → ...tactWindow.class/instance/contactNames.st b/...tactWindow.class/instance/contactNames.st → ...tactWindow.class/instance/contactNames.st
diff --git a/...ontactWindow.class/instance/createChat.st → ...ontactWindow.class/instance/createChat.st b/...ontactWindow.class/instance/createChat.st → ...ontactWindow.class/instance/createChat.st
diff --git a/...tWindow.class/instance/getContactIndex.st → ...tWindow.class/instance/getContactIndex.st b/...tWindow.class/instance/getContactIndex.st → ...tWindow.class/instance/getContactIndex.st
diff --git a/...indow.class/instance/getSelectedUserId.st → ...indow.class/instance/getSelectedUserId.st b/...indow.class/instance/getSelectedUserId.st → ...indow.class/instance/getSelectedUserId.st
diff --git a/...ontactWindow.class/instance/initialize.st → ...ontactWindow.class/instance/initialize.st b/...ontactWindow.class/instance/initialize.st → ...ontactWindow.class/instance/initialize.st
diff --git a/...ctWindow.class/instance/receivedUsers..st → ...ctWindow.class/instance/receivedUsers..st b/...ctWindow.class/instance/receivedUsers..st → ...ctWindow.class/instance/receivedUsers..st
diff --git a/...Window.class/instance/setContactIndex..st → ...Window.class/instance/setContactIndex..st b/...Window.class/instance/setContactIndex..st → ...Window.class/instance/setContactIndex..st
diff --git a/...tWindow.class/instance/userToUIString..st → ...tWindow.class/instance/userToUIString..st b/...tWindow.class/instance/userToUIString..st → ...tWindow.class/instance/userToUIString..st
diff --git a/...ContactWindow.class/methodProperties.json → ...ContactWindow.class/methodProperties.json b/...ContactWindow.class/methodProperties.json → ...ContactWindow.class/methodProperties.json
diff --git a/...legramContactWindow.class/properties.json → ...legramContactWindow.class/properties.json b/...legramContactWindow.class/properties.json → ...legramContactWindow.class/properties.json
@@ -9,7 +9,7 @@
 		"backend",
 		"users",
 		"contactIndex" ],
-	"name" : "TD_TelegramContactWindow",
+	"name" : "TDTelegramContactWindow",
 	"pools" : [
 		 ],
 	"super" : "Model",

diff --git a/...amGroupChatCreationWindow.class/README.md → ...amGroupChatCreationWindow.class/README.md b/...amGroupChatCreationWindow.class/README.md → ...amGroupChatCreationWindow.class/README.md
diff --git a/...tionWindow.class/class/newWithBackend..st → ...tionWindow.class/class/newWithBackend..st b/...tionWindow.class/class/newWithBackend..st → ...tionWindow.class/class/newWithBackend..st
diff --git a/...CreationWindow.class/instance/addUser..st → ...CreationWindow.class/instance/addUser..st b/...CreationWindow.class/instance/addUser..st → ...CreationWindow.class/instance/addUser..st
diff --git a/...CreationWindow.class/instance/backend..st → ...CreationWindow.class/instance/backend..st b/...CreationWindow.class/instance/backend..st → ...CreationWindow.class/instance/backend..st
diff --git a/...tCreationWindow.class/instance/backend.st → ...tCreationWindow.class/instance/backend.st b/...tCreationWindow.class/instance/backend.st → ...tCreationWindow.class/instance/backend.st
diff --git a/...w.class/instance/buildContactListWith..st → ...w.class/instance/buildContactListWith..st b/...w.class/instance/buildContactListWith..st → ...w.class/instance/buildContactListWith..st
diff --git a/...s/instance/buildCreateGroupButtonWith..st → ...s/instance/buildCreateGroupButtonWith..st b/...s/instance/buildCreateGroupButtonWith..st → ...s/instance/buildCreateGroupButtonWith..st
diff --git a/...dow.class/instance/buildNameFieldWith..st → ...dow.class/instance/buildNameFieldWith..st b/...dow.class/instance/buildNameFieldWith..st → ...dow.class/instance/buildNameFieldWith..st
diff --git a/...eationWindow.class/instance/buildWith..st → ...eationWindow.class/instance/buildWith..st b/...eationWindow.class/instance/buildWith..st → ...eationWindow.class/instance/buildWith..st
diff --git a/...hatCreationWindow.class/instance/close.st → ...hatCreationWindow.class/instance/close.st b/...hatCreationWindow.class/instance/close.st → ...hatCreationWindow.class/instance/close.st
diff --git a/...tionWindow.class/instance/contactNames.st → ...tionWindow.class/instance/contactNames.st b/...tionWindow.class/instance/contactNames.st → ...tionWindow.class/instance/contactNames.st
diff --git a/...ationWindow.class/instance/createGroup.st → ...ationWindow.class/instance/createGroup.st b/...ationWindow.class/instance/createGroup.st → ...ationWindow.class/instance/createGroup.st
diff --git a/...ss/instance/getSelectedContactIndexAt..st → ...ss/instance/getSelectedContactIndexAt..st b/...ss/instance/getSelectedContactIndexAt..st → ...ss/instance/getSelectedContactIndexAt..st
diff --git a/...eationWindow.class/instance/initialize.st → ...eationWindow.class/instance/initialize.st b/...eationWindow.class/instance/initialize.st → ...eationWindow.class/instance/initialize.st
diff --git a/...eationWindow.class/instance/nameDraft..st → ...eationWindow.class/instance/nameDraft..st b/...eationWindow.class/instance/nameDraft..st → ...eationWindow.class/instance/nameDraft..st
diff --git a/...reationWindow.class/instance/nameDraft.st → ...reationWindow.class/instance/nameDraft.st b/...reationWindow.class/instance/nameDraft.st → ...reationWindow.class/instance/nameDraft.st
diff --git a/...onWindow.class/instance/receivedUsers..st → ...onWindow.class/instance/receivedUsers..st b/...onWindow.class/instance/receivedUsers..st → ...onWindow.class/instance/receivedUsers..st
diff --git a/...nstance/setSelectedContactIndexAt.put..st → ...nstance/setSelectedContactIndexAt.put..st b/...nstance/setSelectedContactIndexAt.put..st → ...nstance/setSelectedContactIndexAt.put..st
diff --git a/...nWindow.class/instance/userToUIString..st → ...nWindow.class/instance/userToUIString..st b/...nWindow.class/instance/userToUIString..st → ...nWindow.class/instance/userToUIString..st
diff --git a/...reationWindow.class/methodProperties.json → ...reationWindow.class/methodProperties.json b/...reationWindow.class/methodProperties.json → ...reationWindow.class/methodProperties.json
diff --git a/...pChatCreationWindow.class/properties.json → ...pChatCreationWindow.class/properties.json b/...pChatCreationWindow.class/properties.json → ...pChatCreationWindow.class/properties.json
@@ -10,7 +10,7 @@
 		"users",
 		"nameDraft",
 		"selectedContactList" ],
-	"name" : "TD_TelegramGroupChatCreationWindow",
+	"name" : "TDTelegramGroupChatCreationWindow",
 	"pools" : [
 		 ],
 	"super" : "Model",

diff --git a/...-UI.package/TD_TelegramUI.class/README.md → ...t-UI.package/TDTelegramUI.class/README.md b/...-UI.package/TD_TelegramUI.class/README.md → ...t-UI.package/TDTelegramUI.class/README.md
diff --git a/...TelegramUI.class/class/newWithBackend..st → ...TelegramUI.class/class/newWithBackend..st b/...TelegramUI.class/class/newWithBackend..st → ...TelegramUI.class/class/newWithBackend..st
diff --git a/.../TD_TelegramUI.class/instance/addChat..st → ...e/TDTelegramUI.class/instance/addChat..st b/.../TD_TelegramUI.class/instance/addChat..st → ...e/TDTelegramUI.class/instance/addChat..st
diff --git a/..._TelegramUI.class/instance/addMessage..st → ...DTelegramUI.class/instance/addMessage..st b/..._TelegramUI.class/instance/addMessage..st → ...DTelegramUI.class/instance/addMessage..st
diff --git a/...TelegramUI.class/instance/addMessages..st → ...TelegramUI.class/instance/addMessages..st b/...TelegramUI.class/instance/addMessages..st → ...TelegramUI.class/instance/addMessages..st
diff --git a/.../TD_TelegramUI.class/instance/backend..st → ...e/TDTelegramUI.class/instance/backend..st b/.../TD_TelegramUI.class/instance/backend..st → ...e/TDTelegramUI.class/instance/backend..st
diff --git a/...amUI.class/instance/buildChatListWith..st → ...amUI.class/instance/buildChatListWith..st b/...amUI.class/instance/buildChatListWith..st → ...amUI.class/instance/buildChatListWith..st
diff --git a/...I.class/instance/buildMessageListWith..st → ...I.class/instance/buildMessageListWith..st b/...I.class/instance/buildMessageListWith..st → ...I.class/instance/buildMessageListWith..st
diff --git a/...class/instance/buildNewChatButtonWith..st → ...class/instance/buildNewChatButtonWith..st b/...class/instance/buildNewChatButtonWith..st → ...class/instance/buildNewChatButtonWith..st
diff --git a/.../instance/buildNewGroupChatButtonWith..st → .../instance/buildNewGroupChatButtonWith..st b/.../instance/buildNewGroupChatButtonWith..st → .../instance/buildNewGroupChatButtonWith..st
diff --git a/...UI.class/instance/buildSendButtonWith..st → ...UI.class/instance/buildSendButtonWith..st b/...UI.class/instance/buildSendButtonWith..st → ...UI.class/instance/buildSendButtonWith..st
diff --git a/...mUI.class/instance/buildTextFieldWith..st → ...mUI.class/instance/buildTextFieldWith..st b/...mUI.class/instance/buildTextFieldWith..st → ...mUI.class/instance/buildTextFieldWith..st
diff --git a/...D_TelegramUI.class/instance/buildWith..st → ...TDTelegramUI.class/instance/buildWith..st b/...D_TelegramUI.class/instance/buildWith..st → ...TDTelegramUI.class/instance/buildWith..st
diff --git a/...UI.class/instance/calculateColor.With..st → ...UI.class/instance/calculateColor.With..st b/...UI.class/instance/calculateColor.With..st → ...UI.class/instance/calculateColor.With..st
diff --git a/...D_TelegramUI.class/instance/chatTitels.st → ...TDTelegramUI.class/instance/chatTitels.st b/...D_TelegramUI.class/instance/chatTitels.st → ...TDTelegramUI.class/instance/chatTitels.st
diff --git a/...age/TD_TelegramUI.class/instance/close.st → ...kage/TDTelegramUI.class/instance/close.st b/...age/TD_TelegramUI.class/instance/close.st → ...kage/TDTelegramUI.class/instance/close.st
diff --git a/...mUI.class/instance/extractMessageCache.st → ...mUI.class/instance/extractMessageCache.st b/...mUI.class/instance/extractMessageCache.st → ...mUI.class/instance/extractMessageCache.st
diff --git a/...TelegramUI.class/instance/getChatIndex.st → ...TelegramUI.class/instance/getChatIndex.st b/...TelegramUI.class/instance/getChatIndex.st → ...TelegramUI.class/instance/getChatIndex.st
diff --git a/...amUI.class/instance/getColorArrayFrom..st → ...amUI.class/instance/getColorArrayFrom..st b/...amUI.class/instance/getColorArrayFrom..st → ...amUI.class/instance/getColorArrayFrom..st
diff --git a/...ramUI.class/instance/getSelectedChatId.st → ...ramUI.class/instance/getSelectedChatId.st b/...ramUI.class/instance/getSelectedChatId.st → ...ramUI.class/instance/getSelectedChatId.st
diff --git a/...D_TelegramUI.class/instance/initialize.st → ...TDTelegramUI.class/instance/initialize.st b/...D_TelegramUI.class/instance/initialize.st → ...TDTelegramUI.class/instance/initialize.st
@@ -1,7 +1,7 @@
 initialize
 initialize
 	super initialize.
-	debouncer := TD_Debouncer new.
+	debouncer := TDDebouncer new.
 	userCache := Dictionary new.
 	self initializeVariables.
 	self initializeListeners
diff --git a/...mUI.class/instance/initializeListeners.st → ...mUI.class/instance/initializeListeners.st b/...mUI.class/instance/initializeListeners.st → ...mUI.class/instance/initializeListeners.st
diff --git a/...mUI.class/instance/initializeVariables.st → ...mUI.class/instance/initializeVariables.st b/...mUI.class/instance/initializeVariables.st → ...mUI.class/instance/initializeVariables.st
diff --git a/...elegramUI.class/instance/messageDraft..st → ...elegramUI.class/instance/messageDraft..st b/...elegramUI.class/instance/messageDraft..st → ...elegramUI.class/instance/messageDraft..st
diff --git a/...TelegramUI.class/instance/messageDraft.st → ...TelegramUI.class/instance/messageDraft.st b/...TelegramUI.class/instance/messageDraft.st → ...TelegramUI.class/instance/messageDraft.st
diff --git a/..._TelegramUI.class/instance/messageList.st → ...DTelegramUI.class/instance/messageList.st b/..._TelegramUI.class/instance/messageList.st → ...DTelegramUI.class/instance/messageList.st
diff --git a/...ramUI.class/instance/onAuthStateReady..st → ...ramUI.class/instance/onAuthStateReady..st b/...ramUI.class/instance/onAuthStateReady..st → ...ramUI.class/instance/onAuthStateReady..st
diff --git a/TelegramClient-UI.package/TDTelegramUI.class/instance/openContacts.st b/TelegramClient-UI.package/TDTelegramUI.class/instance/openContacts.st
@@ -0,0 +1,3 @@
+building
+openContacts
+ToolBuilder open: (TDTelegramContactWindow newWithBackend: backend)
diff --git a/TelegramClient-UI.package/TDTelegramUI.class/instance/openGroupChatCreation.st b/TelegramClient-UI.package/TDTelegramUI.class/instance/openGroupChatCreation.st
@@ -0,0 +1,3 @@
+building
+openGroupChatCreation
+ToolBuilder open: (TDTelegramGroupChatCreationWindow newWithBackend: backend)
diff --git a/...legramUI.class/instance/receivedChats..st → ...legramUI.class/instance/receivedChats..st b/...legramUI.class/instance/receivedChats..st → ...legramUI.class/instance/receivedChats..st
diff --git a/...mUI.class/instance/receivedNewMessage..st → ...mUI.class/instance/receivedNewMessage..st b/...mUI.class/instance/receivedNewMessage..st → ...mUI.class/instance/receivedNewMessage..st
diff --git a/...elegramUI.class/instance/receivedUser..st → ...elegramUI.class/instance/receivedUser..st b/...elegramUI.class/instance/receivedUser..st → ...elegramUI.class/instance/receivedUser..st
diff --git a/..._TelegramUI.class/instance/sendMessage.st → ...DTelegramUI.class/instance/sendMessage.st b/..._TelegramUI.class/instance/sendMessage.st → ...DTelegramUI.class/instance/sendMessage.st
diff --git a/...elegramUI.class/instance/setChatIndex..st → ...elegramUI.class/instance/setChatIndex..st b/...elegramUI.class/instance/setChatIndex..st → ...elegramUI.class/instance/setChatIndex..st
diff --git a/...I.class/instance/setMessageCacheChatId.st → ...I.class/instance/setMessageCacheChatId.st b/...I.class/instance/setMessageCacheChatId.st → ...I.class/instance/setMessageCacheChatId.st
diff --git a/...ramUI.class/instance/updateMessageList.st → ...ramUI.class/instance/updateMessageList.st b/...ramUI.class/instance/updateMessageList.st → ...ramUI.class/instance/updateMessageList.st
diff --git a/...TD_TelegramUI.class/methodProperties.json → .../TDTelegramUI.class/methodProperties.json b/...TD_TelegramUI.class/methodProperties.json → .../TDTelegramUI.class/methodProperties.json
@@ -20,15 +20,15 @@
 		"getChatIndex" : "HB 7/7/2019 22:27",
 		"getColorArrayFrom:" : "ts 7/26/2019 15:56",
 		"getSelectedChatId" : "ts 7/25/2019 16:19",
-		"initialize" : "aa 7/26/2019 22:15",
+		"initialize" : "aa 7/26/2019 22:30",
 		"initializeListeners" : "HB 7/26/2019 13:30",
 		"initializeVariables" : "ts 7/26/2019 14:02",
 		"messageDraft" : "ts 7/25/2019 16:20",
 		"messageDraft:" : "ts 7/25/2019 16:20",
 		"messageList" : "ts 7/26/2019 16:04",
 		"onAuthStateReady:" : "HB 7/26/2019 13:30",
-		"openContacts" : "aa 7/26/2019 22:20",
-		"openGroupChatCreation" : "aa 7/26/2019 22:20",
+		"openContacts" : "aa 7/26/2019 22:34",
+		"openGroupChatCreation" : "aa 7/26/2019 22:34",
 		"receivedChats:" : "ts 7/25/2019 16:21",
 		"receivedNewMessage:" : "ts 7/25/2019 16:21",
 		"receivedUser:" : "ts 7/25/2019 16:21",

diff --git a/...ckage/TD_TelegramUI.class/properties.json → ...ackage/TDTelegramUI.class/properties.json b/...ckage/TD_TelegramUI.class/properties.json → ...ackage/TDTelegramUI.class/properties.json
@@ -14,7 +14,7 @@
 		"debouncer",
 		"chatIndex",
 		"userCache" ],
-	"name" : "TD_TelegramUI",
+	"name" : "TDTelegramUI",
 	"pools" : [
 		 ],
 	"super" : "Model",

diff --git a/TelegramClient-UI.package/TD_TelegramUI.class/instance/openContacts.st b/TelegramClient-UI.package/TD_TelegramUI.class/instance/openContacts.st
diff --git a/TelegramClient-UI.package/TD_TelegramUI.class/instance/openGroupChatCreation.st b/TelegramClient-UI.package/TD_TelegramUI.class/instance/openGroupChatCreation.st
diff --git a/...ient.package/TD_Debouncer.class/README.md → ...lient.package/TDDebouncer.class/README.md b/...ient.package/TD_Debouncer.class/README.md → ...lient.package/TDDebouncer.class/README.md
diff --git a/...kage/TD_Debouncer.class/instance/call..st → ...ckage/TDDebouncer.class/instance/call..st b/...kage/TD_Debouncer.class/instance/call..st → ...ckage/TDDebouncer.class/instance/call..st
diff --git a/...TD_Debouncer.class/instance/initialize.st → .../TDDebouncer.class/instance/initialize.st b/...TD_Debouncer.class/instance/initialize.st → .../TDDebouncer.class/instance/initialize.st
diff --git a/...kage/TD_Debouncer.class/instance/reset.st → ...ckage/TDDebouncer.class/instance/reset.st b/...kage/TD_Debouncer.class/instance/reset.st → ...ckage/TDDebouncer.class/instance/reset.st
diff --git a/...e/TD_Debouncer.class/instance/timeout..st → ...ge/TDDebouncer.class/instance/timeout..st b/...e/TD_Debouncer.class/instance/timeout..st → ...ge/TDDebouncer.class/instance/timeout..st
diff --git a/...ge/TD_Debouncer.class/instance/timeout.st → ...age/TDDebouncer.class/instance/timeout.st b/...ge/TD_Debouncer.class/instance/timeout.st → ...age/TDDebouncer.class/instance/timeout.st
diff --git a/.../TD_Debouncer.class/methodProperties.json → ...e/TDDebouncer.class/methodProperties.json b/.../TD_Debouncer.class/methodProperties.json → ...e/TDDebouncer.class/methodProperties.json
diff --git a/...ackage/TD_Debouncer.class/properties.json → ...package/TDDebouncer.class/properties.json b/...ackage/TD_Debouncer.class/properties.json → ...package/TDDebouncer.class/properties.json
@@ -8,7 +8,7 @@
 	"instvars" : [
 		"timeOfLastCall",
 		"timeout" ],
-	"name" : "TD_Debouncer",
+	"name" : "TDDebouncer",
 	"pools" : [
 		 ],
 	"super" : "Object",

diff --git a/...amClient.package/TD_Debug.class/README.md → ...ramClient.package/TDDebug.class/README.md b/...amClient.package/TD_Debug.class/README.md → ...ramClient.package/TDDebug.class/README.md
diff --git a/...ent.package/TD_Debug.class/class/clear.st → ...ient.package/TDDebug.class/class/clear.st b/...ent.package/TD_Debug.class/class/clear.st → ...ient.package/TDDebug.class/class/clear.st
diff --git a/...e/TD_Debug.class/class/countOpenDebugs.st → ...ge/TDDebug.class/class/countOpenDebugs.st b/...e/TD_Debug.class/class/countOpenDebugs.st → ...ge/TDDebug.class/class/countOpenDebugs.st
diff --git a/TelegramClient/packages/TelegramClient.package/TDDebug.class/class/ensureStreamIsOpen.st b/TelegramClient/packages/TelegramClient.package/TDDebug.class/class/ensureStreamIsOpen.st
@@ -0,0 +1,3 @@
+as yet unclassified
+ensureStreamIsOpen
+	self writerStream isNil ifTrue: [self writerStream: (TDDebugStream on:  (Text new: 1000))].
diff --git a/...nt.package/TD_Debug.class/class/error..st → ...ent.package/TDDebug.class/class/error..st b/...nt.package/TD_Debug.class/class/error..st → ...ent.package/TDDebug.class/class/error..st
diff --git a/...ckage/TD_Debug.class/class/error.from..st → ...ackage/TDDebug.class/class/error.from..st b/...ckage/TD_Debug.class/class/error.from..st → ...ackage/TDDebug.class/class/error.from..st
diff --git a/...ient.package/TD_Debug.class/class/log..st → ...lient.package/TDDebug.class/class/log..st b/...ient.package/TD_Debug.class/class/log..st → ...lient.package/TDDebug.class/class/log..st
diff --git a/...package/TD_Debug.class/class/log.from..st → ....package/TDDebug.class/class/log.from..st b/...package/TD_Debug.class/class/log.from..st → ....package/TDDebug.class/class/log.from..st
diff --git a/...package/TD_Debug.class/class/logLevel..st → ....package/TDDebug.class/class/logLevel..st b/...package/TD_Debug.class/class/logLevel..st → ....package/TDDebug.class/class/logLevel..st
diff --git a/....package/TD_Debug.class/class/logLevel.st → ...t.package/TDDebug.class/class/logLevel.st b/....package/TD_Debug.class/class/logLevel.st → ...t.package/TDDebug.class/class/logLevel.st
diff --git a/...ebug.class/class/logWithOutLevelCheck..st → ...ebug.class/class/logWithOutLevelCheck..st b/...ebug.class/class/logWithOutLevelCheck..st → ...ebug.class/class/logWithOutLevelCheck..st
diff --git a/...ient.package/TD_Debug.class/class/open.st → ...lient.package/TDDebug.class/class/open.st b/...ient.package/TD_Debug.class/class/open.st → ...lient.package/TDDebug.class/class/open.st
diff --git a/...ackage/TD_Debug.class/class/openWindow.st → ...package/TDDebug.class/class/openWindow.st b/...ackage/TD_Debug.class/class/openWindow.st → ...package/TDDebug.class/class/openWindow.st
diff --git a/...ent.package/TD_Debug.class/class/reset.st → ...ient.package/TDDebug.class/class/reset.st b/...ent.package/TD_Debug.class/class/reset.st → ...ient.package/TDDebug.class/class/reset.st
diff --git a/...ent.package/TD_Debug.class/class/warn..st → ...ient.package/TDDebug.class/class/warn..st b/...ent.package/TD_Debug.class/class/warn..st → ...ient.package/TDDebug.class/class/warn..st
diff --git a/...ackage/TD_Debug.class/class/warn.from..st → ...package/TDDebug.class/class/warn.from..st b/...ackage/TD_Debug.class/class/warn.from..st → ...package/TDDebug.class/class/warn.from..st
diff --git a/...t.package/TD_Debug.class/class/window..st → ...nt.package/TDDebug.class/class/window..st b/...t.package/TD_Debug.class/class/window..st → ...nt.package/TDDebug.class/class/window..st
diff --git a/...nt.package/TD_Debug.class/class/window.st → ...ent.package/TDDebug.class/class/window.st b/...nt.package/TD_Debug.class/class/window.st → ...ent.package/TDDebug.class/class/window.st
diff --git a/...package/TD_Debug.class/class/writeLog..st → ....package/TDDebug.class/class/writeLog..st b/...package/TD_Debug.class/class/writeLog..st → ....package/TDDebug.class/class/writeLog..st
diff --git a/...age/TD_Debug.class/class/writerStream..st → ...kage/TDDebug.class/class/writerStream..st b/...age/TD_Debug.class/class/writerStream..st → ...kage/TDDebug.class/class/writerStream..st
diff --git a/...kage/TD_Debug.class/class/writerStream.st → ...ckage/TDDebug.class/class/writerStream.st b/...kage/TD_Debug.class/class/writerStream.st → ...ckage/TDDebug.class/class/writerStream.st
diff --git a/...kage/TD_Debug.class/methodProperties.json → ...ckage/TDDebug.class/methodProperties.json b/...kage/TD_Debug.class/methodProperties.json → ...ckage/TDDebug.class/methodProperties.json
@@ -2,7 +2,7 @@
 	"class" : {
 		"clear" : "HB 6/14/2019 14:01",
 		"countOpenDebugs" : "HUB 5/15/2019 11:39",
-		"ensureStreamIsOpen" : "aa 7/26/2019 22:19",
+		"ensureStreamIsOpen" : "aa 7/26/2019 22:33",
 		"error:" : "HUB 5/15/2019 11:42",
 		"error:from:" : "HUB 5/15/2019 11:43",
 		"log:" : "HUB 5/15/2019 11:43",

diff --git a/...ts.package/TD_Debug.class/properties.json → ...ent.package/TDDebug.class/properties.json b/...ts.package/TD_Debug.class/properties.json → ...ent.package/TDDebug.class/properties.json
@@ -9,7 +9,7 @@
 	"commentStamp" : "",
 	"instvars" : [
 		 ],
-	"name" : "TD_Debug",
+	"name" : "TDDebug",
 	"pools" : [
 		 ],
 	"super" : "Object",

diff --git a/...nt.package/TD_DebugStream.class/README.md → ...ent.package/TDDebugStream.class/README.md b/...nt.package/TD_DebugStream.class/README.md → ...ent.package/TDDebugStream.class/README.md
diff --git a/...ugStream.class/instance/characterLimit.st → ...ugStream.class/instance/characterLimit.st b/...ugStream.class/instance/characterLimit.st → ...ugStream.class/instance/characterLimit.st
diff --git a/...ge/TD_DebugStream.class/instance/clear.st → ...age/TDDebugStream.class/instance/clear.st b/...ge/TD_DebugStream.class/instance/clear.st → ...age/TDDebugStream.class/instance/clear.st
diff --git a/...TD_DebugStream.class/instance/endEntry.st → .../TDDebugStream.class/instance/endEntry.st b/...TD_DebugStream.class/instance/endEntry.st → .../TDDebugStream.class/instance/endEntry.st
diff --git a/...D_DebugStream.class/instance/semaphore.st → ...TDDebugStream.class/instance/semaphore.st b/...D_DebugStream.class/instance/semaphore.st → ...TDDebugStream.class/instance/semaphore.st
diff --git a/...ge/TD_DebugStream.class/instance/show..st → ...age/TDDebugStream.class/instance/show..st b/...ge/TD_DebugStream.class/instance/show..st → ...age/TDDebugStream.class/instance/show..st
diff --git a/.../TD_DebugStream.class/instance/showln..st → ...e/TDDebugStream.class/instance/showln..st b/.../TD_DebugStream.class/instance/showln..st → ...e/TDDebugStream.class/instance/showln..st
diff --git a/...D_DebugStream.class/methodProperties.json → ...TDDebugStream.class/methodProperties.json b/...D_DebugStream.class/methodProperties.json → ...TDDebugStream.class/methodProperties.json
diff --git a/...kage/TD_DebugStream.class/properties.json → ...ckage/TDDebugStream.class/properties.json b/...kage/TD_DebugStream.class/properties.json → ...ckage/TDDebugStream.class/properties.json
@@ -7,7 +7,7 @@
 	"commentStamp" : "",
 	"instvars" : [
 		 ],
-	"name" : "TD_DebugStream",
+	"name" : "TDDebugStream",
 	"pools" : [
 		 ],
 	"super" : "TextStream",

diff --git a/...ent.package/TD_JSONClient.class/README.md → ...ient.package/TDJSONClient.class/README.md b/...ent.package/TD_JSONClient.class/README.md → ...ient.package/TDJSONClient.class/README.md
diff --git a/...ckage/TD_JSONClient.class/class/create.st → ...ackage/TDJSONClient.class/class/create.st b/...ckage/TD_JSONClient.class/class/create.st → ...ackage/TDJSONClient.class/class/create.st
diff --git a/...age/TD_JSONClient.class/class/destroy..st → ...kage/TDJSONClient.class/class/destroy..st b/...age/TD_JSONClient.class/class/destroy..st → ...kage/TDJSONClient.class/class/destroy..st
diff --git a/...NClient.class/class/executeOn.request..st → ...NClient.class/class/executeOn.request..st b/...NClient.class/class/executeOn.request..st → ...NClient.class/class/executeOn.request..st
diff --git a/...t.class/class/receiveFrom.withTimeout..st → ...t.class/class/receiveFrom.withTimeout..st b/...t.class/class/receiveFrom.withTimeout..st → ...t.class/class/receiveFrom.withTimeout..st
diff --git a/...JSONClient.class/class/sendTo.request..st → ...JSONClient.class/class/sendTo.request..st b/...JSONClient.class/class/sendTo.request..st → ...JSONClient.class/class/sendTo.request..st
diff --git a/...e/TD_JSONClient.class/instance/destroy.st → ...ge/TDJSONClient.class/instance/destroy.st b/...e/TD_JSONClient.class/instance/destroy.st → ...ge/TDJSONClient.class/instance/destroy.st
diff --git a/.../TD_JSONClient.class/instance/execute..st → ...e/TDJSONClient.class/instance/execute..st b/.../TD_JSONClient.class/instance/execute..st → ...e/TDJSONClient.class/instance/execute..st
diff --git a/...D_JSONClient.class/instance/initialize.st → ...TDJSONClient.class/instance/initialize.st b/...D_JSONClient.class/instance/initialize.st → ...TDJSONClient.class/instance/initialize.st
diff --git a/..._JSONClient.class/instance/isDestroyed.st → ...DJSONClient.class/instance/isDestroyed.st b/..._JSONClient.class/instance/isDestroyed.st → ...DJSONClient.class/instance/isDestroyed.st
diff --git a/.../TD_JSONClient.class/instance/receive..st → ...e/TDJSONClient.class/instance/receive..st b/.../TD_JSONClient.class/instance/receive..st → ...e/TDJSONClient.class/instance/receive..st
diff --git a/...age/TD_JSONClient.class/instance/send..st → ...kage/TDJSONClient.class/instance/send..st b/...age/TD_JSONClient.class/instance/send..st → ...kage/TDJSONClient.class/instance/send..st
@@ -3,5 +3,5 @@ send: request
 	| stream |
 	stream := ReadWriteStream on: ''.
 	request jsonWriteOn: stream.
-	TD_Debug log: ' [SEND]',stream contents.
+	TDDebug log: ' [SEND]',stream contents.
 	^self class sendTo: client request: stream contents.
diff --git a/...TD_JSONClient.class/methodProperties.json → .../TDJSONClient.class/methodProperties.json b/...TD_JSONClient.class/methodProperties.json → .../TDJSONClient.class/methodProperties.json
@@ -11,4 +11,4 @@
 		"initialize" : "HUB 5/11/2019 15:10",
 		"isDestroyed" : "HUB 5/11/2019 14:25",
 		"receive:" : "HB 6/14/2019 12:16",
-		"send:" : "aa 7/26/2019 22:17" } }
+		"send:" : "aa 7/26/2019 22:32" } }
diff --git a/...ckage/TD_JSONClient.class/properties.json → ...ackage/TDJSONClient.class/properties.json b/...ckage/TD_JSONClient.class/properties.json → ...ackage/TDJSONClient.class/properties.json
@@ -9,7 +9,7 @@
 		"client",
 		"jsonParser",
 		"destroyed" ],
-	"name" : "TD_JSONClient",
+	"name" : "TDJSONClient",
 	"pools" : [
 		 ],
 	"super" : "Object",

diff --git a/...package/TD_JSONClientMock.class/README.md → ....package/TDJSONClientMock.class/README.md b/...package/TD_JSONClientMock.class/README.md → ....package/TDJSONClientMock.class/README.md
diff --git a/...D_JSONClientMock.class/class/chatCount.st → ...TDJSONClientMock.class/class/chatCount.st b/...D_JSONClientMock.class/class/chatCount.st → ...TDJSONClientMock.class/class/chatCount.st
diff --git a/...ntMock.class/class/messageInChat1Count.st → ...ntMock.class/class/messageInChat1Count.st b/...ntMock.class/class/messageInChat1Count.st → ...ntMock.class/class/messageInChat1Count.st
diff --git a/...NClientMock.class/instance/answerSend..st → ...NClientMock.class/instance/answerSend..st b/...NClientMock.class/instance/answerSend..st → ...NClientMock.class/instance/answerSend..st
diff --git a/..._JSONClientMock.class/instance/destroy.st → ...DJSONClientMock.class/instance/destroy.st b/..._JSONClientMock.class/instance/destroy.st → ...DJSONClientMock.class/instance/destroy.st
diff --git a/...JSONClientMock.class/instance/execute..st → ...JSONClientMock.class/instance/execute..st b/...JSONClientMock.class/instance/execute..st → ...JSONClientMock.class/instance/execute..st
diff --git a/...ONClientMock.class/instance/initialize.st → ...ONClientMock.class/instance/initialize.st b/...ONClientMock.class/instance/initialize.st → ...ONClientMock.class/instance/initialize.st
@@ -1,5 +1,5 @@
 as yet unclassified
 initialize
-	jsonParser := TD_JSONParser new.
+	jsonParser := TDJSONParser new.
 	destroyed := false.
 	receivingMsgQueue := OrderedCollection new.
diff --git a/...JSONClientMock.class/instance/receive..st → ...JSONClientMock.class/instance/receive..st b/...JSONClientMock.class/instance/receive..st → ...JSONClientMock.class/instance/receive..st
diff --git a/...TD_JSONClientMock.class/instance/send..st → .../TDJSONClientMock.class/instance/send..st b/...TD_JSONClientMock.class/instance/send..st → .../TDJSONClientMock.class/instance/send..st
diff --git a/...SONClientMock.class/methodProperties.json → ...SONClientMock.class/methodProperties.json b/...SONClientMock.class/methodProperties.json → ...SONClientMock.class/methodProperties.json
@@ -6,6 +6,6 @@
 		"answerSend:" : "HB 7/26/2019 14:57",
 		"destroy" : "HB 7/26/2019 12:43",
 		"execute:" : "HB 7/26/2019 12:43",
-		"initialize" : "aa 7/26/2019 22:16",
+		"initialize" : "aa 7/26/2019 22:31",
 		"receive:" : "HB 7/26/2019 12:46",
 		"send:" : "HB 7/26/2019 13:50" } }
diff --git a/...e/TD_JSONClientMock.class/properties.json → ...ge/TDJSONClientMock.class/properties.json b/...e/TD_JSONClientMock.class/properties.json → ...ge/TDJSONClientMock.class/properties.json
@@ -7,8 +7,8 @@
 	"commentStamp" : "",
 	"instvars" : [
 		"receivingMsgQueue" ],
-	"name" : "TD_JSONClientMock",
+	"name" : "TDJSONClientMock",
 	"pools" : [
 		 ],
-	"super" : "TD_JSONClient",
+	"super" : "TDJSONClient",
 	"type" : "normal" }
diff --git a/...ckage/TD_JSONClientPython.class/README.md → ...ackage/TDJSONClientPython.class/README.md b/...ckage/TD_JSONClientPython.class/README.md → ...ackage/TDJSONClientPython.class/README.md
diff --git a/...SONClientPython.class/instance/destroy.st → ...SONClientPython.class/instance/destroy.st b/...SONClientPython.class/instance/destroy.st → ...SONClientPython.class/instance/destroy.st
diff --git a/...ClientPython.class/instance/initialize.st → ...ClientPython.class/instance/initialize.st b/...ClientPython.class/instance/initialize.st → ...ClientPython.class/instance/initialize.st
diff --git a/...ONClientPython.class/instance/receive..st → ...ONClientPython.class/instance/receive..st b/...ONClientPython.class/instance/receive..st → ...ONClientPython.class/instance/receive..st
@@ -3,7 +3,7 @@ receive: timeout
 	| readBytes |
 	(bufferPos - 1 == buffer size) ifTrue: [ 
 		 (bufferStart == 1) ifTrue: [
-			TD_Debug error: 'Buffer overflow! Loosing data'.
+			TDDebug error: 'Buffer overflow! Loosing data'.
 			bufferStart := 1.
 			bufferPos := 1.
 		] ifFalse: [

diff --git a/..._JSONClientPython.class/instance/send..st → ...DJSONClientPython.class/instance/send..st b/..._JSONClientPython.class/instance/send..st → ...DJSONClientPython.class/instance/send..st
@@ -3,6 +3,6 @@ send: request
 	| stream |
 	stream := ReadWriteStream on: ''.
 	request jsonWriteOn: stream.
-	TD_Debug log: ' [SEND]',stream contents.
+	TDDebug log: ' [SEND]',stream contents.
 	socket sendData: (stream contents size asByteArrayOfSize: 8).
 	socket sendData: stream contents.
diff --git a/...NClientPython.class/methodProperties.json → ...NClientPython.class/methodProperties.json b/...NClientPython.class/methodProperties.json → ...NClientPython.class/methodProperties.json
@@ -4,5 +4,5 @@
 	"instance" : {
 		"destroy" : "HB 6/4/2019 11:39",
 		"initialize" : "aa 6/12/2019 18:09",
-		"receive:" : "aa 7/26/2019 22:17",
-		"send:" : "aa 7/26/2019 22:18" } }
+		"receive:" : "aa 7/26/2019 22:32",
+		"send:" : "aa 7/26/2019 22:33" } }
diff --git a/...TD_JSONClientPython.class/properties.json → .../TDJSONClientPython.class/properties.json b/...TD_JSONClientPython.class/properties.json → .../TDJSONClientPython.class/properties.json
@@ -10,8 +10,8 @@
 		"buffer",
 		"bufferPos",
 		"bufferStart" ],
-	"name" : "TD_JSONClientPython",
+	"name" : "TDJSONClientPython",
 	"pools" : [
 		 ],
-	"super" : "TD_JSONClient",
+	"super" : "TDJSONClient",
 	"type" : "normal" }
diff --git a/...ent.package/TD_JSONParser.class/README.md → ...ient.package/TDJSONParser.class/README.md b/...ent.package/TD_JSONParser.class/README.md → ...ient.package/TDJSONParser.class/README.md
diff --git a/...rser.class/instance/deserializeObject..st → ...rser.class/instance/deserializeObject..st b/...rser.class/instance/deserializeObject..st → ...rser.class/instance/deserializeObject..st
@@ -22,5 +22,5 @@ deserializeObject: jobj
 			].
 		].
 	string := jobj at: '@type' asString.
-	TD_Debug warn: '[NOT IMPLEMENTED]', string.
+	TDDebug warn: '[NOT IMPLEMENTED]', string.
 	^nil.
diff --git a/...rser.class/instance/deserializeString..st → ...rser.class/instance/deserializeString..st b/...rser.class/instance/deserializeString..st → ...rser.class/instance/deserializeString..st
diff --git a/...D_JSONParser.class/instance/initialize.st → ...TDJSONParser.class/instance/initialize.st b/...D_JSONParser.class/instance/initialize.st → ...TDJSONParser.class/instance/initialize.st
diff --git a/...ser.class/instance/isSerializedObject..st → ...ser.class/instance/isSerializedObject..st b/...ser.class/instance/isSerializedObject..st → ...ser.class/instance/isSerializedObject..st
diff --git a/...TD_JSONParser.class/methodProperties.json → .../TDJSONParser.class/methodProperties.json b/...TD_JSONParser.class/methodProperties.json → .../TDJSONParser.class/methodProperties.json
@@ -2,7 +2,7 @@
 	"class" : {
 		 },
 	"instance" : {
-		"deserializeObject:" : "aa 7/26/2019 22:18",
+		"deserializeObject:" : "aa 7/26/2019 22:33",
 		"deserializeString:" : "HUB 5/4/2019 02:17",
 		"initialize" : "HUB 5/4/2019 02:17",
 		"isSerializedObject:" : "HUB 5/4/2019 15:45" } }
diff --git a/...ckage/TD_JSONParser.class/properties.json → ...ackage/TDJSONParser.class/properties.json b/...ckage/TD_JSONParser.class/properties.json → ...ackage/TDJSONParser.class/properties.json
@@ -7,7 +7,7 @@
 	"commentStamp" : "",
 	"instvars" : [
 		"jsonparser" ],
-	"name" : "TD_JSONParser",
+	"name" : "TDJSONParser",
 	"pools" : [
 		 ],
 	"super" : "Object",

diff --git a/...lient.package/TD_Telegram.class/README.md → ...Client.package/TDTelegram.class/README.md b/...lient.package/TD_Telegram.class/README.md → ...Client.package/TDTelegram.class/README.md
diff --git a/...package/TD_Telegram.class/class/create.st → ....package/TDTelegram.class/class/create.st b/...package/TD_Telegram.class/class/create.st → ....package/TDTelegram.class/class/create.st
@@ -1,6 +1,6 @@
 instance creation
 create
 	| telegram |
-	telegram := self createTelegram: (TD_JSONClient new).
+	telegram := self createTelegram: (TDJSONClient new).
 	self openUI: telegram.
 	^ telegram.
diff --git a/...legram.class/class/createPythonVersion.st → ...legram.class/class/createPythonVersion.st b/...legram.class/class/createPythonVersion.st → ...legram.class/class/createPythonVersion.st
@@ -1,6 +1,6 @@
 instance creation
 createPythonVersion
 	| telegram |
-	telegram := self createTelegram: (TD_JSONClientPython new).
+	telegram := self createTelegram: (TDJSONClientPython new).
 	self openUI: telegram.
 	^ telegram
diff --git a/...D_Telegram.class/class/createTelegram..st → ...TDTelegram.class/class/createTelegram..st b/...D_Telegram.class/class/createTelegram..st → ...TDTelegram.class/class/createTelegram..st
diff --git a/...ge/TD_Telegram.class/class/debugCreate.st → ...age/TDTelegram.class/class/debugCreate.st b/...ge/TD_Telegram.class/class/debugCreate.st → ...age/TDTelegram.class/class/debugCreate.st
@@ -1,5 +1,5 @@
 instance creation
 debugCreate
 	Transcript clear.
-	TD_Debug clear.
+	TDDebug clear.
 	^ self create.
diff --git a/TelegramClient/packages/TelegramClient.package/TDTelegram.class/class/openUI..st b/TelegramClient/packages/TelegramClient.package/TDTelegram.class/class/openUI..st
@@ -0,0 +1,3 @@
+instance creation
+openUI: telegram
+	ToolBuilder open: (TDTelegramUI newWithBackend: telegram).
diff --git a/...age/TD_Telegram.class/instance/client..st → ...kage/TDTelegram.class/instance/client..st b/...age/TD_Telegram.class/instance/client..st → ...kage/TDTelegram.class/instance/client..st
diff --git a/...nce/createNewBasicGroupChat.withTitle..st → ...nce/createNewBasicGroupChat.withTitle..st b/...nce/createNewBasicGroupChat.withTitle..st → ...nce/createNewBasicGroupChat.withTitle..st
diff --git a/....class/instance/createPrivateChatWith..st → ....class/instance/createPrivateChatWith..st b/....class/instance/createPrivateChatWith..st → ....class/instance/createPrivateChatWith..st
diff --git a/...age/TD_Telegram.class/instance/destroy.st → ...kage/TDTelegram.class/instance/destroy.st b/...age/TD_Telegram.class/instance/destroy.st → ...kage/TDTelegram.class/instance/destroy.st
diff --git a/..._Telegram.class/instance/fetchAllChats.st → ...DTelegram.class/instance/fetchAllChats.st b/..._Telegram.class/instance/fetchAllChats.st → ...DTelegram.class/instance/fetchAllChats.st
diff --git a/...legram.class/instance/fetchAllContacts.st → ...legram.class/instance/fetchAllContacts.st b/...legram.class/instance/fetchAllContacts.st → ...legram.class/instance/fetchAllContacts.st
diff --git a/.../TD_Telegram.class/instance/fetchChat..st → ...e/TDTelegram.class/instance/fetchChat..st b/.../TD_Telegram.class/instance/fetchChat..st → ...e/TDTelegram.class/instance/fetchChat..st
diff --git a/...egram.class/instance/fetchMessagesFor..st → ...egram.class/instance/fetchMessagesFor..st b/...egram.class/instance/fetchMessagesFor..st → ...egram.class/instance/fetchMessagesFor..st
diff --git a/.../instance/fetchMessagesFor.startingAt..st → .../instance/fetchMessagesFor.startingAt..st b/.../instance/fetchMessagesFor.startingAt..st → .../instance/fetchMessagesFor.startingAt..st
diff --git a/.../TD_Telegram.class/instance/fetchUser..st → ...e/TDTelegram.class/instance/fetchUser..st b/.../TD_Telegram.class/instance/fetchUser..st → ...e/TDTelegram.class/instance/fetchUser..st
diff --git a/...am.class/instance/fireListenerMessage..st → ...am.class/instance/fireListenerMessage..st b/...am.class/instance/fireListenerMessage..st → ...am.class/instance/fireListenerMessage..st
diff --git a/.../TD_Telegram.class/instance/initialize.st → ...e/TDTelegram.class/instance/initialize.st b/.../TD_Telegram.class/instance/initialize.st → ...e/TDTelegram.class/instance/initialize.st
diff --git a/...ss/instance/initializeAuthStateHandler.st → ...ss/instance/initializeAuthStateHandler.st b/...ss/instance/initializeAuthStateHandler.st → ...ss/instance/initializeAuthStateHandler.st
diff --git a/...ass/instance/initializeMessageHandlers.st → ...ass/instance/initializeMessageHandlers.st b/...ass/instance/initializeMessageHandlers.st → ...ass/instance/initializeMessageHandlers.st
diff --git a/...gram.class/instance/isLibraryConnected.st → ...gram.class/instance/isLibraryConnected.st b/...gram.class/instance/isLibraryConnected.st → ...gram.class/instance/isLibraryConnected.st
diff --git a/...nce/registerListener.for.withSelector..st → ...nce/registerListener.for.withSelector..st b/...nce/registerListener.for.withSelector..st → ...nce/registerListener.for.withSelector..st
diff --git a/...elegram.class/instance/sendMessage.to..st → ...elegram.class/instance/sendMessage.to..st b/...elegram.class/instance/sendMessage.to..st → ...elegram.class/instance/sendMessage.to..st
diff --git a/...e/TD_Telegram.class/instance/uiObject..st → ...ge/TDTelegram.class/instance/uiObject..st b/...e/TD_Telegram.class/instance/uiObject..st → ...ge/TDTelegram.class/instance/uiObject..st
diff --git a/...ge/TD_Telegram.class/instance/uiObject.st → ...age/TDTelegram.class/instance/uiObject.st b/...ge/TD_Telegram.class/instance/uiObject.st → ...age/TDTelegram.class/instance/uiObject.st
diff --git a/...e/unregisterListener.for.withSelector..st → ...e/unregisterListener.for.withSelector..st b/...e/unregisterListener.for.withSelector..st → ...e/unregisterListener.for.withSelector..st
diff --git a/...kage/TD_Telegram.class/instance/update.st → ...ckage/TDTelegram.class/instance/update.st b/...kage/TD_Telegram.class/instance/update.st → ...ckage/TDTelegram.class/instance/update.st
@@ -3,6 +3,6 @@ update
 	| command |
 	command := client receive: 0.05. 
 	command isNil ifTrue: [^nil].
-	TD_Debug log: '[RECIEVED](', command class asString,')', command asString.
+	TDDebug log: '[RECIEVED](', command class asString,')', command asString.
 	(messageHandlerDict at: command class ifAbsent: [ [:msg |]] ) value: command.
 	self fireListenerMessage: command
diff --git a/...e/TD_Telegram.class/methodProperties.json → ...ge/TDTelegram.class/methodProperties.json b/...e/TD_Telegram.class/methodProperties.json → ...ge/TDTelegram.class/methodProperties.json
@@ -1,10 +1,10 @@
 {
 	"class" : {
-		"create" : "aa 7/26/2019 22:16",
-		"createPythonVersion" : "aa 7/26/2019 22:17",
+		"create" : "aa 7/26/2019 22:31",
+		"createPythonVersion" : "aa 7/26/2019 22:31",
 		"createTelegram:" : "HB 7/26/2019 13:11",
-		"debugCreate" : "aa 7/26/2019 22:18",
-		"openUI:" : "aa 7/26/2019 22:20" },
+		"debugCreate" : "aa 7/26/2019 22:33",
+		"openUI:" : "aa 7/26/2019 22:35" },
 	"instance" : {
 		"client:" : "HB 7/26/2019 12:50",
 		"createNewBasicGroupChat:withTitle:" : "HB 7/7/2019 23:11",
@@ -26,4 +26,4 @@
 		"uiObject" : "ts 7/24/2019 12:29",
 		"uiObject:" : "ts 7/24/2019 12:29",
 		"unregisterListener:for:withSelector:" : "HB 7/5/2019 16:04",
-		"update" : "aa 7/26/2019 22:18" } }
+		"update" : "aa 7/26/2019 22:33" } }
diff --git a/...package/TD_Telegram.class/properties.json → ....package/TDTelegram.class/properties.json b/...package/TD_Telegram.class/properties.json → ....package/TDTelegram.class/properties.json
@@ -10,7 +10,7 @@
 		"messageHandlerDict",
 		"authStateHandlerDict",
 		"listener" ],
-	"name" : "TD_Telegram",
+	"name" : "TDTelegram",
 	"pools" : [
 		 ],
 	"super" : "Object",

diff --git a/.../TD_TelegramContactWindow.class/README.md → ...e/TDTelegramContactWindow.class/README.md b/.../TD_TelegramContactWindow.class/README.md → ...e/TDTelegramContactWindow.class/README.md
diff --git a/...tactWindow.class/class/newWithBackend..st → ...tactWindow.class/class/newWithBackend..st b/...tactWindow.class/class/newWithBackend..st → ...tactWindow.class/class/newWithBackend..st
diff --git a/...mContactWindow.class/instance/addUser..st → ...mContactWindow.class/instance/addUser..st b/...mContactWindow.class/instance/addUser..st → ...mContactWindow.class/instance/addUser..st
diff --git a/...mContactWindow.class/instance/backend..st → ...mContactWindow.class/instance/backend..st b/...mContactWindow.class/instance/backend..st → ...mContactWindow.class/instance/backend..st
diff --git a/...amContactWindow.class/instance/backend.st → ...amContactWindow.class/instance/backend.st b/...amContactWindow.class/instance/backend.st → ...amContactWindow.class/instance/backend.st
diff --git a/...w.class/instance/buildContactListWith..st → ...w.class/instance/buildContactListWith..st b/...w.class/instance/buildContactListWith..st → ...w.class/instance/buildContactListWith..st
diff --git a/...ss/instance/buildCreateChatButtonWith..st → ...ss/instance/buildCreateChatButtonWith..st b/...ss/instance/buildCreateChatButtonWith..st → ...ss/instance/buildCreateChatButtonWith..st
diff --git a/...ontactWindow.class/instance/buildWith..st → ...ontactWindow.class/instance/buildWith..st b/...ontactWindow.class/instance/buildWith..st → ...ontactWindow.class/instance/buildWith..st
diff --git a/...gramContactWindow.class/instance/close.st → ...gramContactWindow.class/instance/close.st b/...gramContactWindow.class/instance/close.st → ...gramContactWindow.class/instance/close.st
diff --git a/...tactWindow.class/instance/contactNames.st → ...tactWindow.class/instance/contactNames.st b/...tactWindow.class/instance/contactNames.st → ...tactWindow.class/instance/contactNames.st
diff --git a/...ontactWindow.class/instance/createChat.st → ...ontactWindow.class/instance/createChat.st b/...ontactWindow.class/instance/createChat.st → ...ontactWindow.class/instance/createChat.st
diff --git a/...tWindow.class/instance/getContactIndex.st → ...tWindow.class/instance/getContactIndex.st b/...tWindow.class/instance/getContactIndex.st → ...tWindow.class/instance/getContactIndex.st
diff --git a/...indow.class/instance/getSelectedUserId.st → ...indow.class/instance/getSelectedUserId.st b/...indow.class/instance/getSelectedUserId.st → ...indow.class/instance/getSelectedUserId.st
diff --git a/...ontactWindow.class/instance/initialize.st → ...ontactWindow.class/instance/initialize.st b/...ontactWindow.class/instance/initialize.st → ...ontactWindow.class/instance/initialize.st
diff --git a/...ctWindow.class/instance/receivedUsers..st → ...ctWindow.class/instance/receivedUsers..st b/...ctWindow.class/instance/receivedUsers..st → ...ctWindow.class/instance/receivedUsers..st
diff --git a/...Window.class/instance/setContactIndex..st → ...Window.class/instance/setContactIndex..st b/...Window.class/instance/setContactIndex..st → ...Window.class/instance/setContactIndex..st
diff --git a/...tWindow.class/instance/userToUIString..st → ...tWindow.class/instance/userToUIString..st b/...tWindow.class/instance/userToUIString..st → ...tWindow.class/instance/userToUIString..st
diff --git a/...ContactWindow.class/methodProperties.json → ...ContactWindow.class/methodProperties.json b/...ContactWindow.class/methodProperties.json → ...ContactWindow.class/methodProperties.json
diff --git a/...legramContactWindow.class/properties.json → ...legramContactWindow.class/properties.json b/...legramContactWindow.class/properties.json → ...legramContactWindow.class/properties.json
@@ -9,7 +9,7 @@
 		"backend",
 		"users",
 		"contactIndex" ],
-	"name" : "TD_TelegramContactWindow",
+	"name" : "TDTelegramContactWindow",
 	"pools" : [
 		 ],
 	"super" : "Model",

diff --git a/...amGroupChatCreationWindow.class/README.md → ...amGroupChatCreationWindow.class/README.md b/...amGroupChatCreationWindow.class/README.md → ...amGroupChatCreationWindow.class/README.md
diff --git a/...tionWindow.class/class/newWithBackend..st → ...tionWindow.class/class/newWithBackend..st b/...tionWindow.class/class/newWithBackend..st → ...tionWindow.class/class/newWithBackend..st
diff --git a/...CreationWindow.class/instance/addUser..st → ...CreationWindow.class/instance/addUser..st b/...CreationWindow.class/instance/addUser..st → ...CreationWindow.class/instance/addUser..st
diff --git a/...CreationWindow.class/instance/backend..st → ...CreationWindow.class/instance/backend..st b/...CreationWindow.class/instance/backend..st → ...CreationWindow.class/instance/backend..st
diff --git a/...tCreationWindow.class/instance/backend.st → ...tCreationWindow.class/instance/backend.st b/...tCreationWindow.class/instance/backend.st → ...tCreationWindow.class/instance/backend.st
diff --git a/...w.class/instance/buildContactListWith..st → ...w.class/instance/buildContactListWith..st b/...w.class/instance/buildContactListWith..st → ...w.class/instance/buildContactListWith..st
diff --git a/...s/instance/buildCreateGroupButtonWith..st → ...s/instance/buildCreateGroupButtonWith..st b/...s/instance/buildCreateGroupButtonWith..st → ...s/instance/buildCreateGroupButtonWith..st
diff --git a/...dow.class/instance/buildNameFieldWith..st → ...dow.class/instance/buildNameFieldWith..st b/...dow.class/instance/buildNameFieldWith..st → ...dow.class/instance/buildNameFieldWith..st
diff --git a/...eationWindow.class/instance/buildWith..st → ...eationWindow.class/instance/buildWith..st b/...eationWindow.class/instance/buildWith..st → ...eationWindow.class/instance/buildWith..st
diff --git a/...hatCreationWindow.class/instance/close.st → ...hatCreationWindow.class/instance/close.st b/...hatCreationWindow.class/instance/close.st → ...hatCreationWindow.class/instance/close.st
diff --git a/...tionWindow.class/instance/contactNames.st → ...tionWindow.class/instance/contactNames.st b/...tionWindow.class/instance/contactNames.st → ...tionWindow.class/instance/contactNames.st
diff --git a/...ationWindow.class/instance/createGroup.st → ...ationWindow.class/instance/createGroup.st b/...ationWindow.class/instance/createGroup.st → ...ationWindow.class/instance/createGroup.st
diff --git a/...ss/instance/getSelectedContactIndexAt..st → ...ss/instance/getSelectedContactIndexAt..st b/...ss/instance/getSelectedContactIndexAt..st → ...ss/instance/getSelectedContactIndexAt..st
diff --git a/...eationWindow.class/instance/initialize.st → ...eationWindow.class/instance/initialize.st b/...eationWindow.class/instance/initialize.st → ...eationWindow.class/instance/initialize.st
diff --git a/...eationWindow.class/instance/nameDraft..st → ...eationWindow.class/instance/nameDraft..st b/...eationWindow.class/instance/nameDraft..st → ...eationWindow.class/instance/nameDraft..st
diff --git a/...reationWindow.class/instance/nameDraft.st → ...reationWindow.class/instance/nameDraft.st b/...reationWindow.class/instance/nameDraft.st → ...reationWindow.class/instance/nameDraft.st
diff --git a/...onWindow.class/instance/receivedUsers..st → ...onWindow.class/instance/receivedUsers..st b/...onWindow.class/instance/receivedUsers..st → ...onWindow.class/instance/receivedUsers..st
diff --git a/...nstance/setSelectedContactIndexAt.put..st → ...nstance/setSelectedContactIndexAt.put..st b/...nstance/setSelectedContactIndexAt.put..st → ...nstance/setSelectedContactIndexAt.put..st
diff --git a/...nWindow.class/instance/userToUIString..st → ...nWindow.class/instance/userToUIString..st b/...nWindow.class/instance/userToUIString..st → ...nWindow.class/instance/userToUIString..st
diff --git a/...reationWindow.class/methodProperties.json → ...reationWindow.class/methodProperties.json b/...reationWindow.class/methodProperties.json → ...reationWindow.class/methodProperties.json
diff --git a/...pChatCreationWindow.class/properties.json → ...pChatCreationWindow.class/properties.json b/...pChatCreationWindow.class/properties.json → ...pChatCreationWindow.class/properties.json
@@ -10,7 +10,7 @@
 		"users",
 		"nameDraft",
 		"selectedContactList" ],
-	"name" : "TD_TelegramGroupChatCreationWindow",
+	"name" : "TDTelegramGroupChatCreationWindow",
 	"pools" : [
 		 ],
 	"super" : "Model",

diff --git a/....package/TD_TelegramTests.class/README.md → ...t.package/TDTelegramTests.class/README.md b/....package/TD_TelegramTests.class/README.md → ...t.package/TDTelegramTests.class/README.md
diff --git a/...mTests.class/instance/getTestVariable..st → ...mTests.class/instance/getTestVariable..st b/...mTests.class/instance/getTestVariable..st → ...mTests.class/instance/getTestVariable..st
diff --git a/...legramTests.class/instance/runAllTests.st → ...legramTests.class/instance/runAllTests.st b/...legramTests.class/instance/runAllTests.st → ...legramTests.class/instance/runAllTests.st
diff --git a/TelegramClient/packages/TelegramClient.package/TDTelegramTests.class/instance/setUp.st b/TelegramClient/packages/TelegramClient.package/TDTelegramTests.class/instance/setUp.st
@@ -0,0 +1,5 @@
+running
+setUp
+
+	telegram := TDTelegram debugNew.
+
diff --git a/..._TelegramTests.class/instance/tearDown.st → ...DTelegramTests.class/instance/tearDown.st b/..._TelegramTests.class/instance/tearDown.st → ...DTelegramTests.class/instance/tearDown.st
diff --git a/...TelegramTests.class/methodProperties.json → ...TelegramTests.class/methodProperties.json b/...TelegramTests.class/methodProperties.json → ...TelegramTests.class/methodProperties.json
@@ -4,5 +4,5 @@
 	"instance" : {
 		"getTestVariable:" : "ts 7/24/2019 13:37",
 		"runAllTests" : "ts 7/26/2019 16:37",
-		"setUp" : "aa 7/26/2019 22:16",
+		"setUp" : "aa 7/26/2019 22:32",
 		"tearDown" : "HB 7/26/2019 12:53" } }
diff --git a/...ge/TD_TelegramTests.class/properties.json → ...age/TDTelegramTests.class/properties.json b/...ge/TD_TelegramTests.class/properties.json → ...age/TDTelegramTests.class/properties.json
@@ -8,7 +8,7 @@
 	"instvars" : [
 		"telegram",
 		"telegramUI" ],
-	"name" : "TD_TelegramTests",
+	"name" : "TDTelegramTests",
 	"pools" : [
 		 ],
 	"super" : "TestCase",

diff --git a/...ent.package/TD_TelegramUI.class/README.md → ...ient.package/TDTelegramUI.class/README.md b/...ent.package/TD_TelegramUI.class/README.md → ...ient.package/TDTelegramUI.class/README.md
diff --git a/...TelegramUI.class/class/newWithBackend..st → ...TelegramUI.class/class/newWithBackend..st b/...TelegramUI.class/class/newWithBackend..st → ...TelegramUI.class/class/newWithBackend..st
diff --git a/.../TD_TelegramUI.class/instance/addChat..st → ...e/TDTelegramUI.class/instance/addChat..st b/.../TD_TelegramUI.class/instance/addChat..st → ...e/TDTelegramUI.class/instance/addChat..st
diff --git a/..._TelegramUI.class/instance/addMessage..st → ...DTelegramUI.class/instance/addMessage..st b/..._TelegramUI.class/instance/addMessage..st → ...DTelegramUI.class/instance/addMessage..st
diff --git a/...TelegramUI.class/instance/addMessages..st → ...TelegramUI.class/instance/addMessages..st b/...TelegramUI.class/instance/addMessages..st → ...TelegramUI.class/instance/addMessages..st
diff --git a/.../TD_TelegramUI.class/instance/backend..st → ...e/TDTelegramUI.class/instance/backend..st b/.../TD_TelegramUI.class/instance/backend..st → ...e/TDTelegramUI.class/instance/backend..st
diff --git a/...amUI.class/instance/buildChatListWith..st → ...amUI.class/instance/buildChatListWith..st b/...amUI.class/instance/buildChatListWith..st → ...amUI.class/instance/buildChatListWith..st
diff --git a/...I.class/instance/buildMessageListWith..st → ...I.class/instance/buildMessageListWith..st b/...I.class/instance/buildMessageListWith..st → ...I.class/instance/buildMessageListWith..st
diff --git a/...class/instance/buildNewChatButtonWith..st → ...class/instance/buildNewChatButtonWith..st b/...class/instance/buildNewChatButtonWith..st → ...class/instance/buildNewChatButtonWith..st
diff --git a/.../instance/buildNewGroupChatButtonWith..st → .../instance/buildNewGroupChatButtonWith..st b/.../instance/buildNewGroupChatButtonWith..st → .../instance/buildNewGroupChatButtonWith..st
diff --git a/...UI.class/instance/buildSendButtonWith..st → ...UI.class/instance/buildSendButtonWith..st b/...UI.class/instance/buildSendButtonWith..st → ...UI.class/instance/buildSendButtonWith..st
diff --git a/...mUI.class/instance/buildTextFieldWith..st → ...mUI.class/instance/buildTextFieldWith..st b/...mUI.class/instance/buildTextFieldWith..st → ...mUI.class/instance/buildTextFieldWith..st
diff --git a/...D_TelegramUI.class/instance/buildWith..st → ...TDTelegramUI.class/instance/buildWith..st b/...D_TelegramUI.class/instance/buildWith..st → ...TDTelegramUI.class/instance/buildWith..st
diff --git a/...UI.class/instance/calculateColor.With..st → ...UI.class/instance/calculateColor.With..st b/...UI.class/instance/calculateColor.With..st → ...UI.class/instance/calculateColor.With..st
diff --git a/...D_TelegramUI.class/instance/chatTitels.st → ...TDTelegramUI.class/instance/chatTitels.st b/...D_TelegramUI.class/instance/chatTitels.st → ...TDTelegramUI.class/instance/chatTitels.st
diff --git a/...age/TD_TelegramUI.class/instance/close.st → ...kage/TDTelegramUI.class/instance/close.st b/...age/TD_TelegramUI.class/instance/close.st → ...kage/TDTelegramUI.class/instance/close.st
diff --git a/...mUI.class/instance/extractMessageCache.st → ...mUI.class/instance/extractMessageCache.st b/...mUI.class/instance/extractMessageCache.st → ...mUI.class/instance/extractMessageCache.st
diff --git a/...TelegramUI.class/instance/getChatIndex.st → ...TelegramUI.class/instance/getChatIndex.st b/...TelegramUI.class/instance/getChatIndex.st → ...TelegramUI.class/instance/getChatIndex.st
diff --git a/...amUI.class/instance/getColorArrayFrom..st → ...amUI.class/instance/getColorArrayFrom..st b/...amUI.class/instance/getColorArrayFrom..st → ...amUI.class/instance/getColorArrayFrom..st
diff --git a/...ramUI.class/instance/getSelectedChatId.st → ...ramUI.class/instance/getSelectedChatId.st b/...ramUI.class/instance/getSelectedChatId.st → ...ramUI.class/instance/getSelectedChatId.st
diff --git a/...D_TelegramUI.class/instance/initialize.st → ...TDTelegramUI.class/instance/initialize.st b/...D_TelegramUI.class/instance/initialize.st → ...TDTelegramUI.class/instance/initialize.st
@@ -1,7 +1,7 @@
 initialize
 initialize
 	super initialize.
-	debouncer := TD_Debouncer new.
+	debouncer := TDDebouncer new.
 	userCache := Dictionary new.
 	self initializeVariables.
 	self initializeListeners
diff --git a/...mUI.class/instance/initializeListeners.st → ...mUI.class/instance/initializeListeners.st b/...mUI.class/instance/initializeListeners.st → ...mUI.class/instance/initializeListeners.st
diff --git a/...mUI.class/instance/initializeVariables.st → ...mUI.class/instance/initializeVariables.st b/...mUI.class/instance/initializeVariables.st → ...mUI.class/instance/initializeVariables.st
diff --git a/...elegramUI.class/instance/messageDraft..st → ...elegramUI.class/instance/messageDraft..st b/...elegramUI.class/instance/messageDraft..st → ...elegramUI.class/instance/messageDraft..st
diff --git a/...TelegramUI.class/instance/messageDraft.st → ...TelegramUI.class/instance/messageDraft.st b/...TelegramUI.class/instance/messageDraft.st → ...TelegramUI.class/instance/messageDraft.st
diff --git a/..._TelegramUI.class/instance/messageList.st → ...DTelegramUI.class/instance/messageList.st b/..._TelegramUI.class/instance/messageList.st → ...DTelegramUI.class/instance/messageList.st
diff --git a/...ramUI.class/instance/onAuthStateReady..st → ...ramUI.class/instance/onAuthStateReady..st b/...ramUI.class/instance/onAuthStateReady..st → ...ramUI.class/instance/onAuthStateReady..st
diff --git a/TelegramClient/packages/TelegramClient.package/TDTelegramUI.class/instance/openContacts.st b/TelegramClient/packages/TelegramClient.package/TDTelegramUI.class/instance/openContacts.st
@@ -0,0 +1,3 @@
+building
+openContacts
+ToolBuilder open: (TDTelegramContactWindow newWithBackend: backend)
diff --git a/...ient/packages/TelegramClient.package/TDTelegramUI.class/instance/openGroupChatCreation.st b/...ient/packages/TelegramClient.package/TDTelegramUI.class/instance/openGroupChatCreation.st
@@ -0,0 +1,3 @@
+building
+openGroupChatCreation
+ToolBuilder open: (TDTelegramGroupChatCreationWindow newWithBackend: backend)
diff --git a/...legramUI.class/instance/receivedChats..st → ...legramUI.class/instance/receivedChats..st b/...legramUI.class/instance/receivedChats..st → ...legramUI.class/instance/receivedChats..st
diff --git a/...mUI.class/instance/receivedNewMessage..st → ...mUI.class/instance/receivedNewMessage..st b/...mUI.class/instance/receivedNewMessage..st → ...mUI.class/instance/receivedNewMessage..st
diff --git a/...elegramUI.class/instance/receivedUser..st → ...elegramUI.class/instance/receivedUser..st b/...elegramUI.class/instance/receivedUser..st → ...elegramUI.class/instance/receivedUser..st
diff --git a/..._TelegramUI.class/instance/sendMessage.st → ...DTelegramUI.class/instance/sendMessage.st b/..._TelegramUI.class/instance/sendMessage.st → ...DTelegramUI.class/instance/sendMessage.st
diff --git a/...elegramUI.class/instance/setChatIndex..st → ...elegramUI.class/instance/setChatIndex..st b/...elegramUI.class/instance/setChatIndex..st → ...elegramUI.class/instance/setChatIndex..st
diff --git a/...I.class/instance/setMessageCacheChatId.st → ...I.class/instance/setMessageCacheChatId.st b/...I.class/instance/setMessageCacheChatId.st → ...I.class/instance/setMessageCacheChatId.st
diff --git a/...ramUI.class/instance/updateMessageList.st → ...ramUI.class/instance/updateMessageList.st b/...ramUI.class/instance/updateMessageList.st → ...ramUI.class/instance/updateMessageList.st
diff --git a/...TD_TelegramUI.class/methodProperties.json → .../TDTelegramUI.class/methodProperties.json b/...TD_TelegramUI.class/methodProperties.json → .../TDTelegramUI.class/methodProperties.json
@@ -20,15 +20,15 @@
 		"getChatIndex" : "HB 7/7/2019 22:27",
 		"getColorArrayFrom:" : "ts 7/26/2019 15:56",
 		"getSelectedChatId" : "ts 7/25/2019 16:19",
-		"initialize" : "aa 7/26/2019 22:15",
+		"initialize" : "aa 7/26/2019 22:30",
 		"initializeListeners" : "HB 7/26/2019 13:30",
 		"initializeVariables" : "ts 7/26/2019 14:02",
 		"messageDraft" : "ts 7/25/2019 16:20",
 		"messageDraft:" : "ts 7/25/2019 16:20",
 		"messageList" : "ts 7/26/2019 16:04",
 		"onAuthStateReady:" : "HB 7/26/2019 13:30",
-		"openContacts" : "aa 7/26/2019 22:20",
-		"openGroupChatCreation" : "aa 7/26/2019 22:20",
+		"openContacts" : "aa 7/26/2019 22:34",
+		"openGroupChatCreation" : "aa 7/26/2019 22:34",
 		"receivedChats:" : "ts 7/25/2019 16:21",
 		"receivedNewMessage:" : "ts 7/25/2019 16:21",
 		"receivedUser:" : "ts 7/25/2019 16:21",

diff --git a/...ckage/TD_TelegramUI.class/properties.json → ...ackage/TDTelegramUI.class/properties.json b/...ckage/TD_TelegramUI.class/properties.json → ...ackage/TDTelegramUI.class/properties.json
@@ -14,7 +14,7 @@
 		"debouncer",
 		"chatIndex",
 		"userCache" ],
-	"name" : "TD_TelegramUI",
+	"name" : "TDTelegramUI",
 	"pools" : [
 		 ],
 	"super" : "Model",

diff --git a/...ackage/TD_TelegramUITests.class/README.md → ...package/TDTelegramUITests.class/README.md b/...ackage/TD_TelegramUITests.class/README.md → ...package/TDTelegramUITests.class/README.md
diff --git a/...gramUITests.class/instance/runAllTests.st → ...gramUITests.class/instance/runAllTests.st b/...gramUITests.class/instance/runAllTests.st → ...gramUITests.class/instance/runAllTests.st
diff --git a/TelegramClient/packages/TelegramClient.package/TDTelegramUITests.class/instance/setUp.st b/TelegramClient/packages/TelegramClient.package/TDTelegramUITests.class/instance/setUp.st
@@ -0,0 +1,7 @@
+as yet unclassified
+setUp
+	TDDebug clear.
+	telegram := TDTelegram createTelegram: (TDJSONClientMock new).
+	uiModel := TDTelegramUI newWithBackend: telegram.
+	ToolBuilder open: uiModel
+
diff --git a/...elegramUITests.class/instance/tearDown.st → ...elegramUITests.class/instance/tearDown.st b/...elegramUITests.class/instance/tearDown.st → ...elegramUITests.class/instance/tearDown.st