@@ -96,10 +96,24 @@ theme_sub_axis_right <- function(title, text, ticks, ticks.length, line, minor.t
96
96
97
97
# ' @export
98
98
# ' @describeIn subtheme Theme specification for the legend.
99
- theme_sub_legend <- function (background , margin , spacing , spacing.x , spacing.y ,
100
- key , key.size , key.height , key.width , text , title ,
101
- position , direction , justification , box , box.just ,
102
- box.margin , box.background , box.spacing ) {
99
+ theme_sub_legend <- function (
100
+ # Text stuff
101
+ text , text.position , title , title.position ,
102
+ # Drawn elements
103
+ background , frame , ticks , ticks.length , axis.line ,
104
+ # Spacings
105
+ spacing , spacing.x , spacing.y , margin ,
106
+ # Seys
107
+ key , key.size , key.height , key.width , key.spacing , key.spacing.x ,
108
+ key.spacing.y , key.justification ,
109
+ # Settings
110
+ byrow , position , direction , location , position.inside ,
111
+ # Justification
112
+ justification , justification.top , justification.bottom , justification.left ,
113
+ justification.right , justification.inside ,
114
+ # Box
115
+ box , box.just , box.margin , box.background , box.spacing
116
+ ) {
103
117
subtheme(find_args(), " legend." )
104
118
}
105
119
0 commit comments