diff options
| -rw-r--r-- | lib/stdlib/doc/src/lib.xml | 8 | ||||
| -rw-r--r-- | lib/stdlib/src/lib.erl | 14 |
2 files changed, 1 insertions, 21 deletions
diff --git a/lib/stdlib/doc/src/lib.xml b/lib/stdlib/doc/src/lib.xml index 69dfdbcf50..01fa3ae32b 100644 --- a/lib/stdlib/doc/src/lib.xml +++ b/lib/stdlib/doc/src/lib.xml @@ -38,14 +38,6 @@ </description> <funcs> - <func> - <name name="progname" arity="0"/> - <fsummary>Return name of Erlang start script.</fsummary> - <desc> - <p>Returns the name of the script that started the current - Erlang session.</p> - </desc> - </func> </funcs> </erlref> diff --git a/lib/stdlib/src/lib.erl b/lib/stdlib/src/lib.erl index a115836411..5146c13361 100644 --- a/lib/stdlib/src/lib.erl +++ b/lib/stdlib/src/lib.erl @@ -19,7 +19,7 @@ %% -module(lib). --export([progname/0, eval_str/1]). +-export([eval_str/1]). -export([extended_parse_exprs/1, extended_parse_term/1, subst_values_for_vars/2]). @@ -28,18 +28,6 @@ format_stacktrace/4, format_stacktrace/5, format_call/4, format_call/5, format_fun/1, format_fun/2]). -%% Return the name of the script that starts (this) erlang -%% --spec progname() -> atom(). - -progname() -> - case init:get_argument(progname) of - {ok, [[Prog]]} -> - list_to_atom(Prog); - _Other -> - no_prog_name - end. - %% eval_str(InStr) -> {ok, OutStr} | {error, ErrStr'} %% InStr must represent a body %% Note: If InStr is a binary it has to be a Latin-1 string. |