branch: externals/a68-mode
commit eb919c1a43b7a59e438362f69fa977910431fc55
Author: Jose E. Marchesi <jose.march...@oracle.com>
Commit: Jose E. Marchesi <jose.march...@oracle.com>
Handle underscore characters in mode indicators in a68-font-lock-keywords
---
a68-mode.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/a68-mode.el b/a68-mode.el
index 9f12e95545..d936bf1f55 100644
--- a/a68-mode.el
+++ b/a68-mode.el
@@ -111,7 +111,7 @@
word-end)
'font-lock-constant-face)
;; only valid for bold stropping
- (cons (concat "\\<[A-Z]+\\>") 'font-lock-type-face)
+ (cons (concat "\\<[A-Z]+[A-Z_]*\\>") 'font-lock-type-face)
(cons "\\('\\w*'\\)"
'font-lock-variable-name-face))
"Highlighting expressions for Algol 68 mode.")
