R/modules/utils.R

@@ -117,7 +117,9 @@ render_forms = function(
       },
       if (!is.na(description) && !is.na(form_label)) shiny::br(),
       if (!is.na(description)) {
-        shiny::span(shiny::markdown(description)) |> htmltools::tagAppendAttributes(style = "color:gray; font-size:small; line-height: 1.4;")
+        shiny::markdown(description) |>
+          shiny::span() |>
+          htmltools::tagAppendAttributes(style = "color:gray; font-size:small; line-height: 1.4;")
       }
     )
   }
@@ -225,7 +227,7 @@ render_forms = function(
   if (form_type == "description_header") {
     form <- shiny::h5(
       label,
-      style = "margin-bottom: -8px; margin-top: 10px;"
+      style = "margin-bottom: 0px; margin-top: 10px;"
     )
   }
 
@@ -236,10 +238,12 @@ render_forms = function(
       form,
       ns = ifelse(missing(ns), shiny::NS(NULL), ns)
     )
+    form <- shiny::tagAppendAttributes(form, style = "margin-top: -10px;")
   }
 
   if (is.null(form)) cli::cli_abort("невозможно создать форму типа '{form_type}' (id: '{form_id}') !")
-  form
+
+  form  
 }
 
 

www/styles.css

@@ -1,7 +1,7 @@
 .description-header {
   /* 1. Add the border around the whole box */
   border-bottom: 2px solid #777777;
-
+  
   /* 2. Forces border inside the total width/height (prevents breaking layouts) */
   box-sizing: border-box;