Packages

bucs

0.1.0
1.1.0 1.0.16 1.0.15 1.0.14 1.0.13 1.0.12 1.0.11 1.0.10 1.0.9 1.0.8 1.0.7 1.0.6 1.0.5 1.0.4 1.0.3 1.0.2 1.0.1 1.0.0 0.1.9 0.1.8 0.1.7 0.1.6 0.1.5 0.1.4 0.1.3 0.1.2 0.1.1 0.1.0

Bots Unit Commons

Current section

Files

Jump to
Readme
28 Versions
0 Dependencies
Dependants
Files
Activity
bucs src buccode.erl
Raw

src/buccode.erl 

-module(buccode).



-export([priv_dir/1]).



% @doc

% Returns the path to the priv directory in an application.

% @end

-spec priv_dir(atom()) -> file:filename() | error.

priv_dir(App) ->

  case code:priv_dir(App) of

    {error, bad_name} ->

      case code:which(App) of

        non_existing ->

          error;

        AppFilename ->

          bucs:pipecall([

                         {fun filename:dirname/1, [AppFilename]},

                         fun filename:dirname/1,

                         {fun filename:join/2, ["priv"]},

                         fun bucfile:expand_path/1

                        ])

      end;

    Path ->

      Path

  end.