rayimage v0.15.1: Turn on custom automatic height/width boxes for `re…

…nder_text_image()`

-`render_text_image()` Add padding to vertical height by default

DESCRIPTION

@@ -1,7 +1,7 @@
 Package: rayimage
 Type: Package
 Title: Image Processing for Simulated Cameras
-Version: 0.15.0
+Version: 0.15.1
 Authors@R: c(person("Tyler", "Morgan-Wall", email = "[email protected]", 
     role = c("aut", "cph", "cre"), comment = c(ORCID = "0000-0002-3131-3814")),
     person("Sean", "Barrett", role = c("ctb", "cph")))

R/render_text_image.R

@@ -81,7 +81,7 @@ render_text_image = function(
     background_alpha = 1,
     use_ragg = TRUE, width = NA, height = NA,
     filename = NULL, 
-    check_text_width = TRUE, check_text_height = FALSE,
+    check_text_width = TRUE, check_text_height = TRUE,
     preview = FALSE) {
   text_metrics = systemfonts::shape_string(text,
     size = size, vjust = 0.5,
@@ -189,7 +189,7 @@ render_text_image = function(
     vert_blank = (vert_bbox[1] - 1) +  (image_height - vert_bbox[2]) 
     hori_blank = (hori_bbox[1] - 1) +  (image_width - hori_bbox[2])
     if(check_text_height) {
-      image_height = image_height - vert_blank
+      image_height = image_height - vert_blank + size
     }
     image_width = image_width - hori_blank + size
   }