From 2323d933823cedd68911ce69ac4ccaaf515c41e8 Mon Sep 17 00:00:00 2001
From: Paul Buerkner <paul.buerkner@gmail.com>
Date: Wed, 10 Feb 2021 22:59:29 +0100
Subject: [PATCH] fix typo

---
 R/stan-prior.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/stan-prior.R b/R/stan-prior.R
index e277a75c1..955d5edc5 100644
--- a/R/stan-prior.R
+++ b/R/stan-prior.R
@@ -431,7 +431,7 @@ stan_special_prior_local <- function(prior, class, ncoef, px,
     m1 <- str_if(center_X, " -1")
     str_add(out$data) <- glue(
       "  // concentration vector of the D2 prior\n",
-      "  vector<lower=0>[K{sp}{m1}] R2D2_cons_D2;\n"
+      "  vector<lower=0>[K{sp}{m1}] R2D2_cons_D2{sp};\n"
     )
     str_add(out$par) <- glue(
       "  // local parameters for the R2D2 prior\n",