@@ -431,7 +431,7 @@ el_def <- function(class = NULL, inherit = NULL, description = NULL) {
431
431
text = el_def(" element_text" ),
432
432
title = el_def(" element_text" , " text" ),
433
433
spacing = el_def(" unit" ),
434
- margins = el_def(" margin" ),
434
+ margins = el_def(c( " margin" , " unit " ) ),
435
435
436
436
axis.line = el_def(" element_line" , " line" ),
437
437
axis.text = el_def(" element_text" , " text" ),
@@ -517,7 +517,7 @@ el_def <- function(class = NULL, inherit = NULL, description = NULL) {
517
517
),
518
518
519
519
legend.background = el_def(" element_rect" , " rect" ),
520
- legend.margin = el_def(c(" margin" , " rel" ), " margins" ),
520
+ legend.margin = el_def(c(" margin" , " unit " , " rel" ), " margins" ),
521
521
legend.spacing = el_def(c(" unit" , " rel" ), " spacing" ),
522
522
legend.spacing.x = el_def(c(" unit" , " rel" ), " legend.spacing" ),
523
523
legend.spacing.y = el_def(c(" unit" , " rel" ), " legend.spacing" ),
@@ -566,7 +566,7 @@ el_def <- function(class = NULL, inherit = NULL, description = NULL) {
566
566
567
567
legend.box = el_def(" character" ),
568
568
legend.box.just = el_def(" character" ),
569
- legend.box.margin = el_def(c(" margin" , " rel" ), " margins" ),
569
+ legend.box.margin = el_def(c(" margin" , " unit " , " rel" ), " margins" ),
570
570
legend.box.background = el_def(" element_rect" , " rect" ),
571
571
legend.box.spacing = el_def(c(" unit" , " rel" ), " spacing" ),
572
572
@@ -606,7 +606,7 @@ el_def <- function(class = NULL, inherit = NULL, description = NULL) {
606
606
plot.tag = el_def(" element_text" , " title" ),
607
607
plot.tag.position = el_def(c(" character" , " numeric" , " integer" )), # Need to also accept numbers
608
608
plot.tag.location = el_def(" character" ),
609
- plot.margin = el_def(c(" margin" , " rel" ), " margins" ),
609
+ plot.margin = el_def(c(" margin" , " unit " , " rel" ), " margins" ),
610
610
611
611
aspect.ratio = el_def(c(" numeric" , " integer" ))
612
612
)
0 commit comments