changed document download path creation

Author: jkubuni

packages/TelegramClient-UI.package/TCUDocumentMessage.class/instance/moveDocument.st

@@ -4,11 +4,10 @@ moveDocument
 	| sourceFile destinationFile sourceStream destinationStream |
 
 	sourceFile := self messageModel core documentStore getDocumentFor: self messageModel documentId.
-	destinationFile := (DirectoryChooserDialog openOn:FileDirectory default label: 'Select Directory for download') pathName, '\', self messageModel filename.
-	Transcript show: destinationFile.
+	destinationFile := (DirectoryChooserDialog openOn:FileDirectory default label: 'Select Directory for download') / self messageModel filename.
 
     	sourceStream := StandardFileStream readOnlyFileNamed: sourceFile.
-    	destinationStream := StandardFileStream newFileNamed: destinationFile.
+    	destinationStream := StandardFileStream newFileNamed: destinationFile pathName.
     	destinationStream binary.
 	[sourceStream atEnd] whileFalse: [
 		destinationStream nextPutAll: (sourceStream next: 1024).

packages/TelegramClient-UI.package/TCUDocumentMessage.class/methodProperties.json

@@ -5,4 +5,4 @@
 	"instance" : {
 		"addContent" : "AH 6/21/2024 14:07",
 		"addIcon" : "JK 6/26/2024 12:31",
-		"moveDocument" : "JK 6/26/2024 14:23" } }
+		"moveDocument" : "JK 6/26/2024 14:38" } }