small fix

Author: lona-k

R/Filter.R

@@ -122,7 +122,7 @@ Filter = R6Class("Filter",
     print = function() {
       cli_h1(sprintf("%s %s%s", class(self)[1L], self$id, if (is.na(self$label)) "" else paste0(": ", self$label)))
       cli_li(sprintf("Task Types: %s", paste(self$task_types, collapse = ", ")))
-      cli_li(sprintf("Properties: %s", paste(self$properties, collapse = ", ")))
+      cli_li(sprintf("Properties: %s", if (length(self$properties)) paste(self$properties, collapse = ", ") else "-"))
       cli_li(sprintf("Task Properties: %s", paste(self$task_properties, collapse = ", ")))
       cli_li(sprintf("Packages: %s", paste(self$packages, collapse = ", ")))
       cli_li(sprintf("Feature types: %s", paste(self$feature_types, collapse = ", ")))