Как я могу исправить подсветку синтаксиса Emacs для qr “ \. [^.] + $ ”?

Emacs сбивает с толку синтаксис после строки вроде

fileparse($file, qr"\.[^.]+$");

и думает, что остальная часть файла является строкой. Как мне это исправить?