Skip to content

Commit

Permalink
Remove renamed links.
Browse files Browse the repository at this point in the history
  • Loading branch information
SebKrantz committed Jun 2, 2024
1 parent 3bd62d1 commit 26a4da0
Showing 1 changed file with 3 additions and 0 deletions.
3 changes: 3 additions & 0 deletions R/rd.R
Original file line number Diff line number Diff line change
Expand Up @@ -21,6 +21,9 @@ parse_Rd2 <- function(file, ...) {
rm_alias <- paste0("\\alias{", rm_alias)
lines <- lines[!startsWith(lines, "%")]
lines <- lines[!startsWith(lines, "\\alias{A")]
lines <- lines[!startsWith(lines, "\\alias{fN")]
lines <- lines[!startsWith(lines, "\\alias{pwN")]
lines <- lines[!startsWith(lines, "\\alias{fHD")]
lines <- lines[rowSums(sapply(rm_alias, startsWith, x = lines, USE.NAMES = FALSE)) <= 0]
tmp <- tempfile(fileext = ".Rd")
write_lines(substcr(substcr(substcr(substcr(substcr(lines))))), tmp)
Expand Down

0 comments on commit 26a4da0

Please sign in to comment.