jonkeane commented on a change in pull request #10992:
URL: https://github.com/apache/arrow/pull/10992#discussion_r701400389



##########
File path: r/tests/testthat/test-metadata.R
##########
@@ -239,13 +239,14 @@ test_that("metadata of list elements (ARROW-10386)", {
   ds <- open_dataset(dst_dir)
   expect_warning(
     df_from_ds <- collect(ds),
-    "Row-level metadata is not compatible with this operation and has been 
ignored"
+    NA # TODO: ARROW-13852
+    # "Row-level metadata is not compatible with this operation and has been 
ignored"
   )
-  expect_equal(df_from_ds[c(1, 4, 3, 2), ], df, check.attributes = FALSE)
+  expect_equal(arrange(df_from_ds, int), arrange(df, int), check.attributes = 
FALSE)
 
   # however there is *no* warning if we don't select the metadata column
   expect_warning(
     df_from_ds <- ds %>% select(int) %>% collect(),
     NA
   )
-})
+})

Review comment:
       ```suggestion
   })
   
   ```




-- 
This is an automated message from the Apache Git Service.
To respond to the message, please log on to GitHub and use the
URL above to go to the specific comment.

To unsubscribe, e-mail: github-unsubscr...@arrow.apache.org

For queries about this service, please contact Infrastructure at:
us...@infra.apache.org


Reply via email to