aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lib/stdlib/doc/src/lib.xml8
-rw-r--r--lib/stdlib/src/lib.erl14
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.