Fixed zip creation not working with new path function

br-automation-com · Jun 10, 2020 · ca92a56 · ca92a56
1 parent 51dea88
commit ca92a56
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/Logical/mappFileExplorer/FileExplorer/Main.st b/Logical/mappFileExplorer/FileExplorer/Main.st
@@ -980,6 +980,8 @@ PROGRAM _CYCLIC
 			// ----------------------------------------------------------------------------------------
 			// Initialize file zip structure
 			CreateCompletePath(EXPL.PAR[side].dir_path, EXPL.DAT[side].item_list[EXPL.VIS[side].item_selected], ADR(tmp_str2));
+			brsmemset(ADR(tmp_str2) + brsstrlen(ADR(tmp_str2))-1, 0, 1);
+
 			zipArchive_0.enable := 1;
 			zipArchive_0.pArchiveDevice := ADR('TMP_USER'); 
 			zipArchive_0.pArchiveFile := ADR(tmp_str1);