diff options
author | John Christopher Anderson <jchris@apache.org> | 2009-10-05 15:34:41 +0000 |
---|---|---|
committer | John Christopher Anderson <jchris@apache.org> | 2009-10-05 15:34:41 +0000 |
commit | 3a47a797e377bc3010d1b167d8b7411d651f4870 (patch) | |
tree | 75c3c9123254fe1fab019e58c0792019f970700c | |
parent | 93bc21dbaab3428f5c6cc29d4171c0479ddcdca6 (diff) |
friendlier error message on bad log config file permissions
git-svn-id: https://svn.apache.org/repos/asf/couchdb/trunk@821856 13f79535-47bb-0310-9956-ffa450edef68
-rw-r--r-- | src/couchdb/couch_config_writer.erl | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/couchdb/couch_config_writer.erl b/src/couchdb/couch_config_writer.erl index 4a859f8d..55e76a84 100644 --- a/src/couchdb/couch_config_writer.erl +++ b/src/couchdb/couch_config_writer.erl @@ -55,7 +55,10 @@ save_to_file({{Section, Option}, Value}, File) -> NewFileContents2 end, - ok = file:write_file(File, list_to_binary(NewFileContents)), + case file:write_file(File, list_to_binary(NewFileContents)) of + ok -> ok; + _Else -> throw({permissions_error, <<"Config file is not writeable.">>}) + end, ok. %% @doc Iterates over the lines of an ini file and replaces or adds a new |