svn commit: r682792 - /incubator/couchdb/trunk/src/couchdb/couch_file.erl

[da...@apache.org]

Author: damien
Date: Tue Aug  5 10:06:43 2008
New Revision: 682792

URL: http://svn.apache.org/viewvc?rev=682792&view=rev
Log:
Fixed bug where we attempted to match a linked port to the current fd, but fail because the fd structure is more than the linked port.

Modified:
    incubator/couchdb/trunk/src/couchdb/couch_file.erl

Modified: incubator/couchdb/trunk/src/couchdb/couch_file.erl
URL: http://svn.apache.org/viewvc/incubator/couchdb/trunk/src/couchdb/couch_file.erl?rev=682792&r1=682791&r2=682792&view=diff
==============================================================================
--- incubator/couchdb/trunk/src/couchdb/couch_file.erl (original)
+++ incubator/couchdb/trunk/src/couchdb/couch_file.erl Tue Aug  5 10:06:43 2008
@@ -396,15 +396,15 @@
 
 should_close(Fd) ->
     case process_info(self(), links) of
-    {links, [Fd]} ->
-        % no linkers left (except our fd). What about monitors?
+    {links, [_]} ->
+        % no linkers left (except our fd port). What about monitors?
         case process_info(self(), monitors) of
         {monitors, []} ->
             true;
         _ ->
             false
         end;
-    {links,  Links} when length(Links) > 1 ->
+    {links,  [_|_]} ->
         false
     end.