fix for check

Author: DanChaltiel

DESCRIPTION

@@ -26,7 +26,6 @@ Imports:
     forcats (>= 1.0.0),
     glue (>= 1.3.0),
     lifecycle (>= 0.2.0),
-    methods,
     officer (>= 0.4.0),
     purrr (>= 0.2.3),
     rlang (>= 1.0.0),

NEWS.md

@@ -13,8 +13,6 @@ Crosstables for descriptive analyses. See documentation at <https://danchaltiel.
 -   fixed error when using a named list of functions in `crosstable(funs)` (#89).
 -   fixed rare infinite loop with `get_label()` on very specific objects like `POSIXlt` (#86).
 
-
-
 # crosstable 0.8.1
 
 #### Bug fixes and improvements

R/officer.R

@@ -942,7 +942,7 @@ parse_md = function(x, parse_ref=TRUE, parse_format=TRUE, parse_code=TRUE, parse
 
   x = str_replace_all(x, fixed("**"), fixed("%%")) #better separates bold from italic
 
-  f = \(x, k, f) str_locate_all(x, k)[[1]] %>% as_tibble() %>% mutate(format=f)
+  f = function(x, k, f) str_locate_all(x, k)[[1]] %>% as_tibble() %>% mutate(format=f)
   bolds = f(x, "(?<!\\\\)%%", "bold")
   italics = f(x, "(?<!\\\\)\\*", "italic")
   underlined = f(x, "(?<!\\\\)_", "underlined")