R/escapeRegex_(from_Hmisc).R

In limonaid: Working with 'LimeSurvey' Surveys and Responses

### Taken directly from Hmisc (to avoid importing the package for just this function)

escapeRegex <- function (string)
{
  gsub("([.|()\\^{}+$*?]|\\[|\\])", "\\\\\\1", string)
}