fix font-lock for R