branch: externals/a68-mode commit c7682e4af4dda0edc7650a56e156ee9b096895db Author: Jose E. Marchesi <jose.march...@oracle.com> Commit: Jose E. Marchesi <jose.march...@oracle.com>
Fix incorrect double-quoting of faces Thanks to Stefan Monnier for pointing out this mistake. --- a68-mode.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/a68-mode.el b/a68-mode.el index 99da435567..45a8b4cb94 100644 --- a/a68-mode.el +++ b/a68-mode.el @@ -239,8 +239,8 @@ ("1" (re-search-backward "2r" nil t) nil (0 ''a68-bits-flip-face))) ;; String breaks. Apostrophe is not (currently) a worthy character ;; out of strings, so for now we can just match it anywhere. - '(a68--string-break-matcher 0 ''a68-string-break-face t) - '(a68--bad-string-break-matcher 2 ''font-lock-warning-face t) + '(a68--string-break-matcher 0 'a68-string-break-face t) + '(a68--bad-string-break-matcher 2 'font-lock-warning-face t) ;; Two or more consecutive underscore characters are always ;; illegal in this stropping regime. (cons "_[_]+" ''font-lock-warning-face))