fix ladderize not found

Yunuuuu · Yunuuuu · commit 32f9d310ce20 · 2025-01-08T22:20:45.000+08:00
diff --git a/R/align-phylo.R b/R/align-phylo.R
@@ -97,7 +97,7 @@ AlignPhylo <- ggproto("AlignPhylo", Align,
         # why R CMD check doesn't give error even I don't add ape to dependency
         if (!is.null(self$ladderize)) {
             phylo <- ape::ladderize(phylo,
-                right = identical(ladderize, "right")
+                right = identical(self$ladderize, "right")
             )
         }
         inject(fortify_data_frame.phylo(data = phylo, !!!self$params))

Original file line number	Diff line number	Diff line change
`@@ -97,7 +97,7 @@ AlignPhylo <- ggproto("AlignPhylo", Align,`
`97`	`97`	`# why R CMD check doesn't give error even I don't add ape to dependency`
`98`	`98`	`if (!is.null(self$ladderize)) {`
`99`	`99`	`phylo <- ape::ladderize(phylo,`
`100`		`- right = identical(ladderize, "right")`
	`100`	`+ right = identical(self$ladderize, "right")`
`101`	`101`	`)`
`102`	`102`	`}`
`103`	`103`	`inject(fortify_data_frame.phylo(data = phylo, !!!self$params))`