summaryrefslogtreecommitdiff
path: root/tools
diff options
context:
space:
mode:
Diffstat (limited to 'tools')
-rwxr-xr-xtools/opt_types.sh6
1 files changed, 5 insertions, 1 deletions
diff --git a/tools/opt_types.sh b/tools/opt_types.sh
index 92cd943d..71d69a5d 100755
--- a/tools/opt_types.sh
+++ b/tools/opt_types.sh
@@ -483,8 +483,12 @@ options_required([Form]) ->
proplists:get_value(required, Opts, []).
format_file(Path, Form) ->
+ Line = case erl_syntax:get_pos(Form) of
+ {L, _} -> L;
+ L -> L
+ end,
filename:rootname(filename:basename(Path)) ++ ".erl:" ++
- integer_to_list(erl_syntax:get_pos(Form)).
+ integer_to_list(Line).
module(Path) ->
list_to_atom(filename:rootname(filename:basename(Path))).