From 49c39212341aef1e2b1945dd2bfe86c087a73547 Mon Sep 17 00:00:00 2001
From: Teun van den Brand <tahvdbrand@gmail.com>
Date: Wed, 29 Jan 2025 12:02:02 +0100
Subject: [PATCH] avoid mapping AsIs variables

---
 R/scale-discrete-.R | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/R/scale-discrete-.R b/R/scale-discrete-.R
index a5ff3289a4..adaebb96d7 100644
--- a/R/scale-discrete-.R
+++ b/R/scale-discrete-.R
@@ -153,6 +153,9 @@ ScaleDiscretePosition <- ggproto("ScaleDiscretePosition", ScaleDiscrete,
   },
 
   map = function(self, x, limits = self$get_limits()) {
+    if (inherits(x, "AsIs")) {
+      return(x)
+    }
     if (is.discrete(x)) {
       values <- self$palette(length(limits))
       if (!is.numeric(values)) {