mirror of
https://github.com/vishapoberon/vipak.git
synced 2026-04-05 20:42:26 +00:00
25 lines
525 B
Modula-2
25 lines
525 B
Modula-2
MODULE vpkSyncer;
|
|
IMPORT Strings, Out,
|
|
vpkSettings, vpkEnv, vpkConf, vpkGit;
|
|
|
|
PROCEDURE mkTreePath(VAR path: ARRAY OF CHAR);
|
|
BEGIN
|
|
vpkEnv.getConfDir(path);
|
|
Strings.Append('/', path);
|
|
Strings.Append(vpkSettings.vpkTreeDir, path);
|
|
END mkTreePath;
|
|
|
|
PROCEDURE sync*;
|
|
VAR
|
|
tree: vpkSettings.tree;
|
|
BEGIN
|
|
(* Syncing *)
|
|
vpkConf.getConfigTreeVal(tree);
|
|
IF tree.typ = vpkSettings.git THEN
|
|
vpkGit.syncTree(tree.url)
|
|
ELSE
|
|
Out.String("TODO: not a git url"); Out.Ln
|
|
END;
|
|
END sync;
|
|
|
|
END vpkSyncer.
|