Browse Source

passes_all

tags/v0.3.1
Bob Rudis 4 years ago
parent
commit
366addb6e1
1 changed files with 1 additions and 1 deletions
  1. +1
    -1
      R/spf.r

+ 1
- 1
R/spf.r View File

@@ -61,7 +61,7 @@ passes_all <- function(spf_rec) {
ret <- vector("logical", length(spf_rec))
spf_rec <- stringi::stri_trim(stringi::stri_replace_all_regex(spf_rec, '"', ""))
SPF <- which(has_spf(spf_rec))
ret[SPF] <- grepl("\\+all$", stringi::stri_trim(spf_rec[SPF]))
ret[SPF] <- grepl("[\\+ ]all$", stringi::stri_trim(spf_rec[SPF]))
ret[!SPF] <- NA
ret
}


Loading…
Cancel
Save