diff options
Diffstat (limited to 'src/index.erl')
-rw-r--r-- | src/index.erl | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/src/index.erl b/src/index.erl index fe47f59..5fe1dd6 100644 --- a/src/index.erl +++ b/src/index.erl @@ -95,8 +95,7 @@ add_internal(File, Index, Entry) when is_binary(Entry), size(Entry) == ?ENTRYSIZ Index * ?ENTRYSIZEINFILE < Position -> read; _ -> - util:exit_with_error(invalid, writefile, - "Index not valid") + {error, invalidindex} end, EntryText = hex:bin_to_hexstr(Entry) ++ "\n", case Mode of @@ -112,10 +111,10 @@ add_internal(File, Index, Entry) when is_binary(Entry), size(Entry) == ?ENTRYSIZ EntryText -> ok; _ -> - util:exit_with_error(invalid, writefile, - "Written content not the" ++ - " same as old content") - end + {error, invalidcontent} + end; + {error, Error} -> + {error, Error} end. |