vishapoberon/vipak
1
0
Fork 0
mirror of https://github.com/vishapoberon/vipak.git synced 2026-04-05 20:42:26 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

tree path fixed

Browse source
This commit is contained in:
Norayr Chilingarian 2020-05-08 03:40:59 +04:00
parent 400e80b116
commit 3d7539125c
1 changed files with 1 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/vpkSyncer.Mod
View file

@ -5,7 +5,6 @@ IMPORT Strings, Out,
PROCEDURE mkTreePath(VAR path: ARRAY OF CHAR); PROCEDURE mkTreePath(VAR path: ARRAY OF CHAR);
BEGIN BEGIN
vpkConf.getConfDir(path); vpkConf.getConfDir(path);
Strings.Append(vpkSettings.vpkConfDir, path);
Strings.Append('/', path); Strings.Append('/', path);
Strings.Append(vpkSettings.vpkTreeDir, path); Strings.Append(vpkSettings.vpkTreeDir, path);
END mkTreePath; END mkTreePath;
@ -22,7 +21,7 @@ VAR
BEGIN BEGIN
mkTreePath(treePath); mkTreePath(treePath);
Out.String("*****************************************"); Out.Ln; Out.String("*****************************************"); Out.Ln;
Out.String("TreePath = "); Out.String(treePath); Out.String("TreePath = "); Out.String(treePath); Out.Ln;
(* Check tree directory if doesn't exist create*) (* Check tree directory if doesn't exist create*)
dir.name := treePath; dir.name := treePath;
IF ~vpkFsHelper.Exists(dir) THEN IF ~vpkFsHelper.Exists(dir) THEN