Tweaks for c88462.

hornik · hornik · commit b56651537c5d · 2025-07-30T07:25:20.000Z
git-svn-id: https://svn.r-project.org/R/trunk@88469 00db46b3-68df-0310-9c12-caf00c1e9a41
diff --git a/src/library/tools/R/RdHelpers.R b/src/library/tools/R/RdHelpers.R
@@ -189,11 +189,10 @@ function(x)
         Rd_expr_bibcite_keys_cited(NULL)
     }
     y <- sort(unique(bib[bib$key %in% keys]))
-    paste(sprintf("\\if{html}{\\out{<span id=\"reference+%s\">}}%s\\if{html}{\\out{</span>}}",
+    paste(sprintf("\\if{html}{\u2060\\out{<span id=\"reference+%s\">}}%s\\if{html}{\\out{</span>}}",
                   string2id(unlist(y$key, use.names = FALSE)),
                   toRd(y)),
-          collapse =
-              "\\if{html}{\\out{</p>}}\n\n\\if{html}{\\out{<p>}}")
+          collapse = "\\if{html}{\\out{</p>}}\n\n\\if{html}{\\out{<p>}}")
 }
 
 Rd_expr_bibcite_keys_cited <- local({

Original file line number	Diff line number	Diff line change
`@@ -189,11 +189,10 @@ function(x)`
`189`	`189`	`Rd_expr_bibcite_keys_cited(NULL)`
`190`	`190`	`}`
`191`	`191`	`y <- sort(unique(bib[bib$key %in% keys]))`
`192`		`- paste(sprintf("\\if{html}{\\out{<span id=\"reference+%s\">}}%s\\if{html}{\\out{</span>}}",`
	`192`	`+ paste(sprintf("\\if{html}{\u2060\\out{<span id=\"reference+%s\">}}%s\\if{html}{\\out{</span>}}",`
`193`	`193`	`string2id(unlist(y$key, use.names = FALSE)),`
`194`	`194`	`toRd(y)),`
`195`		`- collapse =`
`196`		`- "\\if{html}{\\out{</p>}}\n\n\\if{html}{\\out{<p>}}")`
	`195`	`+ collapse = "\\if{html}{\\out{</p>}}\n\n\\if{html}{\\out{<p>}}")`
`197`	`196`	`}`
`198`	`197`
`199`	`198`	`Rd_expr_bibcite_keys_cited <- local({`