Fix a couple minor bugs

R/columns.R

 #'
 #' @inheritParams bulma_column
 #' @examples
-#' bulma_column_options(size = "one-half", offset = "one-quarter")
+#' bulma_column_options(size = "half", offset = "one-quarter")
 #'
 #' @export
 bulma_column_options <- function(size = NULL, width = NULL, offset = NULL, narrow = NULL,

R/layout_level.R

     item = level_item,
     header = level_item_header
   )
-  tag_f <- tag_function(container_tag)
+  tag_f <- tag_function(match.arg(container_tag))
   x <- tag_f(
     class = paste("level", if (is_mobile) "is-mobile"),
     level_side(left),
     level_item_f(...),
-    level_side(right)
+    level_side(right, "right")
   )
 
   x

man/bulma_column_options.Rd

 Bulma Column Options
 }
 \examples{
-bulma_column_options(size = "one-half", offset = "one-quarter")
+bulma_column_options(size = "half", offset = "one-quarter")
 
 }