From d15cced204fc329f7bb5fb0c5d37a2d31814ed09 Mon Sep 17 00:00:00 2001
From: "Pedro J. Aphalo" <pedro.aphalo@helsinki.fi>
Date: Mon, 20 Feb 2023 01:17:51 +0200
Subject: [PATCH] Fix bug, missing call to arg_match()

---
 R/geom-quadrant-lines.R | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/R/geom-quadrant-lines.R b/R/geom-quadrant-lines.R
index f1eb61d..3ea9f5c 100644
--- a/R/geom-quadrant-lines.R
+++ b/R/geom-quadrant-lines.R
@@ -107,6 +107,8 @@ geom_quadrant_lines <- function(mapping = NULL,
                                 inherit.aes = FALSE,
                                 ...) {
 
+  pool.along <- rlang::arg_match(pool.along)
+
   stopifnot("'xintercept' must have length == 1L" = length(xintercept) <= 1,
             "'yintercept' must have length == 1L" = length(yintercept) <= 1)