1 files changed, 0 insertions, 10 deletions
diff --git a/src/LexPerl.cxx b/src/LexPerl.cxx
index 155a0c1a2..c57934866 100644
--- a/src/LexPerl.cxx
+++ b/src/LexPerl.cxx
@@ -67,16 +67,6 @@ static bool isMatch(Accessor &styler, int lengthDoc, int pos, const char *val) {
 	return true;
 }
 
-static bool isOKQuote(char ch) {
-	if (isalnum(ch))
-		return false;
-	if (isspace(ch))
-		return false;
-	if (iscntrl(ch))
-		return false;
-	return true;
-}
-
 static char opposite(char ch) {
 	if (ch == '(')
 		return ')';