Skip to content

Commit

Permalink
quotes
Browse files Browse the repository at this point in the history
  • Loading branch information
brownag committed Jul 16, 2024
1 parent e03beda commit 85211a9
Show file tree
Hide file tree
Showing 2 changed files with 3 additions and 1 deletion.
2 changes: 1 addition & 1 deletion R/EvaluationCurves.R
Original file line number Diff line number Diff line change
Expand Up @@ -581,7 +581,7 @@ extractIsNull <- function(invert = FALSE) {
}

# remove empty quotations (some expressions have these trailing with no content)\
step0 <- gsub("or +or", "or", gsub("\t", " ", gsub("\"\"", "", x)))
step0 <- gsub("or +or", "or", gsub("\t", " ", gsub("\"\"", "", gsub("'", "\"", x))))

if (grepl("[^(]*\\)$", step0)) {
step0 <- gsub(")$", "", step0)
Expand Down
2 changes: 2 additions & 0 deletions tests/testthat/test-CrispExpression.R
Original file line number Diff line number Diff line change
Expand Up @@ -37,4 +37,6 @@ test_that("crisp expression parsing works", {
expect_silent(initRuleset(rulename = "LCC-irr"))

expect_silent(initRuleset(rulename = "FOR - Conservation Tree/Shrub Groups (MT)"))

expect_silent(initRuleset(rulename = "Commodity Crop Productivity Index (Corn) (WI)"))
})

0 comments on commit 85211a9

Please sign in to comment.