mirror of
https://github.com/msberends/AMR.git
synced 2025-07-10 20:21:52 +02:00
(v2.1.1.9227) unit test fixes
This commit is contained in:
6
R/sir.R
6
R/sir.R
@ -1715,11 +1715,7 @@ pillar_shaft.sir <- function(x, ...) {
|
||||
out[x == "S"] <- font_green_bg(" S ")
|
||||
out[x == "I"] <- font_orange_bg(" I ")
|
||||
out[x == "SDD"] <- font_orange_bg(" SDD ")
|
||||
if (is_dark()) {
|
||||
out[x == "R"] <- font_red_bg(" R ")
|
||||
} else {
|
||||
out[x == "R"] <- font_rose_bg(" R ")
|
||||
}
|
||||
out[x == "R"] <- font_rose_bg(" R ")
|
||||
}
|
||||
create_pillar_column(out, align = "left", width = 5)
|
||||
}
|
||||
|
Reference in New Issue
Block a user