Log file corruption at emerg level too

Project: http://git-wip-us.apache.org/repos/asf/couchdb-couch/repo
Commit: http://git-wip-us.apache.org/repos/asf/couchdb-couch/commit/e11b351c
Tree: http://git-wip-us.apache.org/repos/asf/couchdb-couch/tree/e11b351c
Diff: http://git-wip-us.apache.org/repos/asf/couchdb-couch/diff/e11b351c

Branch: refs/heads/import
Commit: e11b351cd6d56a3ec222ac9b68f3d7869c73833b
Parents: fdc3c73
Author: Robert Newson <[email protected]>
Authored: Fri Dec 2 14:03:56 2011 +0000
Committer: Paul J. Davis <[email protected]>
Committed: Fri Jan 17 16:44:29 2014 -0800

----------------------------------------------------------------------
 src/couch_file.erl | 2 ++
 1 file changed, 2 insertions(+)
----------------------------------------------------------------------


http://git-wip-us.apache.org/repos/asf/couchdb-couch/blob/e11b351c/src/couch_file.erl
----------------------------------------------------------------------
diff --git a/src/couch_file.erl b/src/couch_file.erl
index 222df4a..a638c32 100644
--- a/src/couch_file.erl
+++ b/src/couch_file.erl
@@ -166,6 +166,8 @@ pread_iolist(Fd, Pos) ->
         Md5 ->
             {ok, IoList};
         _ ->
+            twig:log(emerg, "File corruption in ~p at position ~B",
+                     [Fd, Pos]),
             exit({file_corruption, <<"file corruption">>})
         end;
     Error ->

Reply via email to