jex get_mindist command done
This commit is contained in:
@@ -611,6 +611,30 @@ gasoline(TarballPath) ->
|
||||
Filename.
|
||||
|
||||
|
||||
%%-----------------------------------------------------------------------------
|
||||
%% jex get_mindist PACKAGE
|
||||
%%-----------------------------------------------------------------------------
|
||||
|
||||
get_mindist(PkgName) ->
|
||||
% does package exist
|
||||
case pkg_devdir(PkgName) of
|
||||
{exists, _} -> get_mindist2(PkgName);
|
||||
{dne, _} -> error({package_not_installed, PkgName})
|
||||
end.
|
||||
|
||||
get_mindist2(PkgName) ->
|
||||
DevDir = devdir(),
|
||||
{ok, CWD} = file:get_cwd(),
|
||||
_ = cmdf("cd ~ts" % cd ~/.jex/dev
|
||||
" && tar -czf ~ts.tar.gz ~ts" % && tar -czf local-sidekick-0.2.0.tar.gz local-sidekick-0.2.0
|
||||
" && mv ~ts.tar.gz ~ts", % && mv local-sidekick-0.2.0 CWD
|
||||
[DevDir,
|
||||
PkgName, PkgName,
|
||||
PkgName, CWD]),
|
||||
ok.
|
||||
|
||||
|
||||
|
||||
%%-----------------------------------------------------------------------------
|
||||
%% INTERNALS
|
||||
%%-----------------------------------------------------------------------------
|
||||
|
||||
Reference in New Issue
Block a user