mirror of
https://github.com/vishapoberon/vipak.git
synced 2026-04-05 20:42:26 +00:00
works
This commit is contained in:
parent
3d7539125c
commit
296803f7f5
1 changed files with 15 additions and 16 deletions
|
|
@ -27,23 +27,22 @@ BEGIN
|
||||||
IF ~vpkFsHelper.Exists(dir) THEN
|
IF ~vpkFsHelper.Exists(dir) THEN
|
||||||
Out.String(treePath); Out.String(" directory doesn't exist, creating"); Out.Ln;
|
Out.String(treePath); Out.String(" directory doesn't exist, creating"); Out.Ln;
|
||||||
b := vpkFsHelper.mkDir(treePath);
|
b := vpkFsHelper.mkDir(treePath);
|
||||||
|
END;
|
||||||
|
IF ~(vpkFsHelper.dir IN dir.attr) THEN
|
||||||
|
Out.String(treePath); Out.String(" exists but is not a directory"); Out.Ln;
|
||||||
|
HALT(1);
|
||||||
|
END;
|
||||||
|
(* Syncing *)
|
||||||
|
vpkConf.getConfPath(confPath);
|
||||||
|
b := vpkFileManager.Read(confPath, jsonData);
|
||||||
|
jsonRecord := vpkJsonParser.Create(jsonData);
|
||||||
|
b := vpkJsonParser.GetTerminal(jsonRecord, vpkSettings.confTermPath, jsonURL);
|
||||||
|
Out.String("URL = "); Out.String(jsonURL); Out.Ln;
|
||||||
|
b := vpkJsonParser.GetTerminal(jsonRecord, vpkSettings.confType, jsonType);
|
||||||
|
IF jsonType = vpkSettings.confTypGit THEN
|
||||||
|
vpkGit.pull(jsonURL, treePath)
|
||||||
ELSE
|
ELSE
|
||||||
IF ~(vpkFsHelper.dir IN dir.attr) THEN
|
Out.String("not a git url"); Out.Ln
|
||||||
Out.String(treePath); Out.String(" exists but is not a directory"); Out.Ln;
|
|
||||||
HALT(1);
|
|
||||||
END;
|
|
||||||
(* Syncing *)
|
|
||||||
vpkConf.getConfPath(confPath);
|
|
||||||
b := vpkFileManager.Read(confPath, jsonData);
|
|
||||||
jsonRecord := vpkJsonParser.Create(jsonData);
|
|
||||||
b := vpkJsonParser.GetTerminal(jsonRecord, vpkSettings.confTermPath, jsonURL);
|
|
||||||
Out.String("URL = "); Out.String(jsonURL); Out.Ln;
|
|
||||||
b := vpkJsonParser.GetTerminal(jsonRecord, vpkSettings.confType, jsonType);
|
|
||||||
IF jsonType = vpkSettings.confTypGit THEN
|
|
||||||
vpkGit.pull(jsonURL, treePath)
|
|
||||||
ELSE
|
|
||||||
Out.String("not a git url"); Out.Ln
|
|
||||||
END;
|
|
||||||
END;
|
END;
|
||||||
END sync;
|
END sync;
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue