update

pathologyatlas · Jul 10, 2024 · 1777260 · 1777260
1 parent 70c8544
commit 1777260
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 7 deletions.
diff --git a/generate_html.R b/generate_html.R
@@ -141,7 +141,7 @@ html_text <- function(TemplateTR, TemplateEN, stain, dzi_info) {
 '
 
   html_text_list <- list()
-  for (s in stain) {
+  for (s in trimws(stain)) {
     data <- list(
       TemplateTR = TemplateTR,
       TemplateEN = TemplateEN,

diff --git a/generate_qmd.R b/generate_qmd.R
@@ -349,7 +349,7 @@ qmd_text <- paste(qmd_text, head_text, sep = "\n\n")
 
 # screenshot render ----
 
-for (s in stain) {
+for (s in trimws(stain)) {
   data_screenshot <- list(
     template = template,
     stain = s
@@ -371,7 +371,7 @@ qmd_text <- paste(qmd_text, tab1, sep = "\n\n")
 
 # wsi_link_string render ----
 
-for (s in stain) {
+for (s in trimws(stain)) {
   data_wsi_link <- list(
     TemplateTR = TemplateTR,
     TemplateEN = TemplateEN,
@@ -395,7 +395,7 @@ qmd_text <- paste(qmd_text, tab2, sep = "\n\n")
 
 # wsi_string render ----
 
-for (s in stain) {
+for (s in trimws(stain)) {
   data_wsi <- list(
     TemplateTR = TemplateTR,
     TemplateEN = TemplateEN,
@@ -728,7 +728,7 @@ readme_text <- paste(readme_text, head_text, sep = "\n\n")
 
 ## wsi_link_string render ----
 
-for (s in stain) {
+for (s in trimws(stain)) {
   data_wsi <- list(
     TemplateTR = TemplateTR,
     TemplateEN = TemplateEN,
@@ -748,7 +748,7 @@ for (s in stain) {
 #
 # ## wsi_string render ----
 #
-# for (s in stain) {
+# for (s in trimws(stain)) {
 #   data_wsi <- list(
 #     TemplateTR = TemplateTR,
 #     TemplateEN = TemplateEN,
@@ -783,7 +783,7 @@ if (use_youtube) {
 
 ## yaml_string render ----
 
-for (s in stain) {
+for (s in trimws(stain)) {
   data_yaml <- list(
     TemplateTR = TemplateTR,
     TemplateEN = TemplateEN,