C: optimized dir opening

src/obidms.c

@@ -764,6 +764,13 @@ OBIDMS_p obi_create_dms(const char* dms_path)
 		return NULL;
 	}
 
+	if (closedir(dms_dir) < 0)
+	{
+		obi_set_errno(OBIDMS_UNKNOWN_ERROR);
+		obidebug(1, "\nError closing a directory");
+		return NULL;
+	}
+
 	return dms;
 }