Add namespace to DictionaryType$code(namespace)

apache · Oct 13, 2023 · c0a80a9 · c0a80a9
1 parent c4b1464
commit c0a80a9
Showing 1 changed file with 4 additions and 4 deletions.
diff --git a/r/R/dictionary.R b/r/R/dictionary.R
@@ -35,18 +35,18 @@ DictionaryType <- R6Class("DictionaryType",
     ToString = function() {
       prettier_dictionary_type(DataType__ToString(self))
     },
-    code = function() {
+    code = function(namespace = FALSE) {
       details <- list()
       if (self$index_type != int32()) {
-        details$index_type <- self$index_type$code()
+        details$index_type <- self$index_type$code(namespace)
       }
       if (self$value_type != utf8()) {
-        details$value_type <- self$value_type$code()
+        details$value_type <- self$value_type$code(namespace)
       }
       if (isTRUE(self$ordered)) {
         details$ordered <- TRUE
       }
-      call2("dictionary", !!!details)
+      call2("dictionary", !!!details, .ns = if(namespace) "arrow")
     }
   ),
   active = list(