From f5b3fa65e341795a3ed8abf3d0a3c7bfa478428f Mon Sep 17 00:00:00 2001 From: hillarymarler <152432687+hillarymarler@users.noreply.github.com> Date: Thu, 12 Feb 2026 14:21:21 -0500 Subject: [PATCH 1/3] Update EQ_DomainValues.R --- R/EQ_DomainValues.R | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/R/EQ_DomainValues.R b/R/EQ_DomainValues.R index c6c4a94..575fc0e 100644 --- a/R/EQ_DomainValues.R +++ b/R/EQ_DomainValues.R @@ -238,7 +238,8 @@ EQ_UpdateInternalDomainValues<- function() { ) param.cw <- param.cw |> - dplyr::select(.data$attains_ws_name, .data$attains_ws_field) |> + dplyr::select(attains_ws_name, + attains_ws_field) |> dplyr::distinct() attains_ws_name <- param.cw |> @@ -261,7 +262,7 @@ EQ_UpdateInternalDomainValues<- function() { domain_values <- purrr::map_dfr(.x = attains_ws_name, .f = fetch_one) domain_values <- domain_values |> - dplyr::left_join(param.cw, by = c("domain" == "attains_ws_name"), + dplyr::left_join(param.cw, by = c("domain" = "attains_ws_name"), relationship = "many-to-many") |> dplyr::rename(attains_ws_name = .data$domain) From e4d79522aa5b662dbbaa8a870e83666ce2e4b44e Mon Sep 17 00:00:00 2001 From: hillarymarler <152432687+hillarymarler@users.noreply.github.com> Date: Thu, 12 Feb 2026 14:21:26 -0500 Subject: [PATCH 2/3] Update DomainValuesNull.rda --- inst/extdata/DomainValuesNull.rda | Bin 565 -> 572 bytes 1 file changed, 0 insertions(+), 0 deletions(-) diff --git a/inst/extdata/DomainValuesNull.rda b/inst/extdata/DomainValuesNull.rda index acd7a1571466fbef7910ef9835112ae5a31d58e7..14d9274c009ff0aa16e69a751a4286478517cef9 100644 GIT binary patch literal 572 zcmV-C0>k|uiwFP!000002F+DXkJB&^HQN?w+HT8Mf(w6vUbt{ATP<3NFEw4UH_JF~ zu$0DKkE8B#;>YqkD7F))lk8G)LE@0a^E@AK#!t?2as4{FjtC(g((Rs*PR}k$?`n1N z>J1?lAmkD0lD_@+#m#KXG~0l6p85zvCiZz*IYf*b%2JW@yW-#o?S0dUgnC z?Tkx?mw6)Xq?JBKYP#^ck$JlG%4rnvZ7mcpLXj|tfL&NUVf?+a1*=h@Oiw=P6xD2* zFKS+MuPm1s1s@;V!%evXh|A@0PbP zU%n>90)#vwUDCI|eQ`6}GR-z%gQxxkArm`ZQ~?p=hO$)T{O(}{3^N5($Pwh`uwN}v_#k_D{KiY8r;vjPIwC=rm<$wy5=*rzwxKa4gbtpTh*K}9)RZ&ROxdVw z2&&LrP~a>J83q-Gi}C5WO6p>4H!$nKt)bX%l@4^#&K}Wame!5W{oS4&(%nZUb8e){ zV=s1fP!g3mLPj55S;BI?Kj@jx{iSY1Zr(Ttpv))l{PnvG2t7R!WW7cfh3d~uygAej9)5CSQU#h9e>a%;%qIS*ShB3J1#Lg{H)%7 z>ult9{@6>`0CBNAv)@!{d`sgxKE|$^#`3F(y^CUJtd+Q}T~Wd){m|<747kKAz#&iV z@|V?&J~@xo{b|~)i~RZ9Ir8*h#s7=>|DfUCy!ndv90pZ`JK+%!H;p%UT)tL7cYxo9 z34+&BWJ&uULaW^@EIYI From 649d3dc4eac99bb763472652c30cc317644ace1b Mon Sep 17 00:00:00 2001 From: hillarymarler <152432687+hillarymarler@users.noreply.github.com> Date: Thu, 12 Feb 2026 14:28:25 -0500 Subject: [PATCH 3/3] Update EQ_DomainValues.R --- R/EQ_DomainValues.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/EQ_DomainValues.R b/R/EQ_DomainValues.R index 575fc0e..27437fd 100644 --- a/R/EQ_DomainValues.R +++ b/R/EQ_DomainValues.R @@ -264,7 +264,7 @@ EQ_UpdateInternalDomainValues<- function() { domain_values <- domain_values |> dplyr::left_join(param.cw, by = c("domain" = "attains_ws_name"), relationship = "many-to-many") |> - dplyr::rename(attains_ws_name = .data$domain) + dplyr::rename(attains_ws_name = domain) save(domain_values, file = "inst/extdata/DomainValues.rda") }