diff --git a/R/geom-text-linked.r b/R/geom-text-linked.r index 0a64b9b..4cca40a 100644 --- a/R/geom-text-linked.r +++ b/R/geom-text-linked.r @@ -530,6 +530,7 @@ compute_just2d <- function(data, ab_orig <- paste(ab, "_orig", sep = "") position <- just == "position" if (!all(unique(ab_orig) %in% colnames(data))) { + # this needs to be silent as it is normal behaviour just[position] <- "middle" } else { just[position] <- diff --git a/tests/testthat/Rplots.pdf b/tests/testthat/Rplots.pdf index 654908c..b3917ec 100644 Binary files a/tests/testthat/Rplots.pdf and b/tests/testthat/Rplots.pdf differ diff --git a/tests/testthat/_snaps/geom-plot/geom-plot-npc-sf1.svg b/tests/testthat/_snaps/geom-plot/geom-plot-npc-sf1.svg index 3982e2b..f2879c8 100644 --- a/tests/testthat/_snaps/geom-plot/geom-plot-npc-sf1.svg +++ b/tests/testthat/_snaps/geom-plot/geom-plot-npc-sf1.svg @@ -77,17 +77,17 @@ - - - - - - - - - - - + + + + + + + + + + + diff --git a/tests/testthat/_snaps/geom-plot/geom-plot-npc-sf2.svg b/tests/testthat/_snaps/geom-plot/geom-plot-npc-sf2.svg index 63b5266..4d6b576 100644 --- a/tests/testthat/_snaps/geom-plot/geom-plot-npc-sf2.svg +++ b/tests/testthat/_snaps/geom-plot/geom-plot-npc-sf2.svg @@ -79,17 +79,17 @@ - - - - - - - - - - - + + + + + + + + + + + diff --git a/tests/testthat/_snaps/position-nudge/dodge-nudge1.svg b/tests/testthat/_snaps/position-nudge/dodge-nudge1.svg index 27c56cb..6d9e49d 100644 --- a/tests/testthat/_snaps/position-nudge/dodge-nudge1.svg +++ b/tests/testthat/_snaps/position-nudge/dodge-nudge1.svg @@ -38,11 +38,11 @@ - - - - - + + + + + other name some long name another name diff --git a/tests/testthat/_snaps/position-nudge/dodge-nudge2.svg b/tests/testthat/_snaps/position-nudge/dodge-nudge2.svg index a91069d..2a4f123 100644 --- a/tests/testthat/_snaps/position-nudge/dodge-nudge2.svg +++ b/tests/testthat/_snaps/position-nudge/dodge-nudge2.svg @@ -38,11 +38,11 @@ - - - - - + + + + + other name some long name another name diff --git a/tests/testthat/_snaps/position-nudge/dodge-nudge3.svg b/tests/testthat/_snaps/position-nudge/dodge-nudge3.svg index 57554c8..c515339 100644 --- a/tests/testthat/_snaps/position-nudge/dodge-nudge3.svg +++ b/tests/testthat/_snaps/position-nudge/dodge-nudge3.svg @@ -38,11 +38,11 @@ - - - - - + + + + + other name diff --git a/tests/testthat/_snaps/position-nudge/dodge-nudge4.svg b/tests/testthat/_snaps/position-nudge/dodge-nudge4.svg index df751b3..a3eaab3 100644 --- a/tests/testthat/_snaps/position-nudge/dodge-nudge4.svg +++ b/tests/testthat/_snaps/position-nudge/dodge-nudge4.svg @@ -38,11 +38,11 @@ - - - - - + + + + + other name some long name another name diff --git a/tests/testthat/_snaps/position-nudge/nudge-keep1.svg b/tests/testthat/_snaps/position-nudge/nudge-keep1.svg index 46facc2..6d04811 100644 --- a/tests/testthat/_snaps/position-nudge/nudge-keep1.svg +++ b/tests/testthat/_snaps/position-nudge/nudge-keep1.svg @@ -41,11 +41,11 @@ - - - - - + + + + + some long name diff --git a/tests/testthat/_snaps/position-nudge/nudge-keep2.svg b/tests/testthat/_snaps/position-nudge/nudge-keep2.svg index 0179bfa..6ac22ae 100644 --- a/tests/testthat/_snaps/position-nudge/nudge-keep2.svg +++ b/tests/testthat/_snaps/position-nudge/nudge-keep2.svg @@ -41,11 +41,11 @@ - - - - - + + + + + some long name diff --git a/tests/testthat/_snaps/position-nudge/nudge-keep3.svg b/tests/testthat/_snaps/position-nudge/nudge-keep3.svg index 883c7f1..9cc5744 100644 --- a/tests/testthat/_snaps/position-nudge/nudge-keep3.svg +++ b/tests/testthat/_snaps/position-nudge/nudge-keep3.svg @@ -41,11 +41,11 @@ - - - - - + + + + + some long name diff --git a/tests/testthat/_snaps/position-nudge/nudge-keep4.svg b/tests/testthat/_snaps/position-nudge/nudge-keep4.svg index 91dc2e9..87faaff 100644 --- a/tests/testthat/_snaps/position-nudge/nudge-keep4.svg +++ b/tests/testthat/_snaps/position-nudge/nudge-keep4.svg @@ -41,11 +41,11 @@ - - - - - + + + + + some long name diff --git a/tests/testthat/_snaps/position-nudge/nudge-line5.svg b/tests/testthat/_snaps/position-nudge/nudge-line5.svg index b4e6ebb..1ae2b31 100644 --- a/tests/testthat/_snaps/position-nudge/nudge-line5.svg +++ b/tests/testthat/_snaps/position-nudge/nudge-line5.svg @@ -27,9 +27,9 @@ - - - + + + diff --git a/tests/testthat/_snaps/position-nudge/stack-nudge1.svg b/tests/testthat/_snaps/position-nudge/stack-nudge1.svg index 294d367..e838b22 100644 --- a/tests/testthat/_snaps/position-nudge/stack-nudge1.svg +++ b/tests/testthat/_snaps/position-nudge/stack-nudge1.svg @@ -40,11 +40,11 @@ - - - - - + + + + + some long name other name some name diff --git a/tests/testthat/_snaps/position-nudge/stack-nudge2.svg b/tests/testthat/_snaps/position-nudge/stack-nudge2.svg index 8d7fe06..4011cc3 100644 --- a/tests/testthat/_snaps/position-nudge/stack-nudge2.svg +++ b/tests/testthat/_snaps/position-nudge/stack-nudge2.svg @@ -40,11 +40,11 @@ - - - - - + + + + + some long name diff --git a/tests/testthat/_snaps/position-nudge/stack-nudge3.svg b/tests/testthat/_snaps/position-nudge/stack-nudge3.svg index 7f39e5f..863e896 100644 --- a/tests/testthat/_snaps/position-nudge/stack-nudge3.svg +++ b/tests/testthat/_snaps/position-nudge/stack-nudge3.svg @@ -40,11 +40,11 @@ - - - - - + + + + + some long name other name some name diff --git a/tests/testthat/_snaps/position-nudge/stack-nudge4.svg b/tests/testthat/_snaps/position-nudge/stack-nudge4.svg index 39ce3d6..11bba45 100644 --- a/tests/testthat/_snaps/position-nudge/stack-nudge4.svg +++ b/tests/testthat/_snaps/position-nudge/stack-nudge4.svg @@ -40,11 +40,11 @@ - - - - - + + + + + some long name other name some name