tweak r88232

git-svn-id: https://svn.r-project.org/R/trunk@88233 00db46b3-68df-0310-9c12-caf00c1e9a41

Author: smeyer

src/library/tools/R/Rd2txt.R

@@ -895,7 +895,7 @@ Rd2txt <-
                                   keepFirstIndent <<- TRUE
                                   linebreak <- identical(opts$descStyle, "linebreak")
                                   suffix <- if (identical(opts$descStyle, "colon")
-                                                && !endsWith(DLlab, ":")) ": "
+                                                && !endsWith(DLlab[length(DLlab)], ":")) ": "
                                             else if (!linebreak) " "
                                   putw(strrep(" ", indent0), DLlab, suffix)
                                   if (linebreak) blankLine(0L)