Packages

katana

0.2.21
1.0.0 0.4.0 0.3.1 0.3.0 0.2.22 0.2.21 0.2.20 0.2.19 0.2.18 0.2.17

Erlang grab bag of useful functions. It should have been called swiss army knife but katanas are deadlier

HexDocs

Current section

Files

Jump to
Readme
10 Versions
2 Dependencies
Dependants
Files
Activity
katana src ktn_user_default.erl
Raw

src/ktn_user_default.erl 

-module(ktn_user_default).

-export([ xref/0

        , l_all/1

        , cmd/1

        , all_modules/0

        , mk/0

        ]).



-spec xref() -> proplists:proplist().

xref() ->

    xref:d("ebin").



-spec l_all([module()]) -> [{module(), code:load_ret()}].

l_all(Mods) when is_list(Mods) ->

  lists:foldl(fun(Mod, A) ->

                  Ret=[{Mod, shell_default:l(Mod)}],

                  lists:append(A, Ret)

              end, [], Mods);

l_all(Mod) ->

  l_all([Mod]).



-spec cmd(iodata()) -> _.

cmd(Cmd) ->

    io:format("~s~n", [os:cmd(Cmd)]).



-spec all_modules() -> [module()].

all_modules() ->

  [ list_to_atom(

      re:replace(

        filename:basename(F), "[.]beam$", "", [{return, list}]))

    ||  P <- code:get_path(),

        string:str(P, code:lib_dir()) == 0,

        F <- filelib:wildcard(filename:join(P, "*.beam"))].



-spec mk() -> up_to_date.

mk() -> up_to_date = make:all([load]).