Unconfuse preserves emacs-mode with muon emacs-mode

This commit is contained in:
Tony Garnock-Jones 2019-11-03 14:24:02 +00:00
parent 1054cd4219
commit f6bbe191ab
1 changed files with 0 additions and 44 deletions

View File

@ -47,51 +47,8 @@
(list
'("\\_<\\(~\\|[A-Z]\\)[^][)(}{><[:space:].\n]*\\>" . font-lock-type-face)
'("\\\\[[:space:]]*?\n" . font-lock-warning-face)
'("\\." . font-lock-builtin-face)
(cons (regexp-opt '("->"
"<-"
"*"
"+"
"-"
"/"
"="
"<"
">"
"<="
">="
"=="
"!="
"|"
)
'symbols)
'font-lock-builtin-face)
(cons (regexp-opt '(
"coerce"
"match"
"ref"
"value"
)
'words)
'font-lock-builtin-face)
(cons (regexp-opt '(
"block"
"import"
"let"
"namespace"
"operator"
"try"
"view"
"while"
)
'words)
'font-lock-keyword-face)
))
(defvar preserves-syntax-propertize-function
(syntax-propertize-rules
("->" (0 "_"))
("<-" (0 "_"))))
(defun preserves-mode-variables ()
(make-local-variable 'comment-use-syntax)
(make-local-variable 'comment-start)
@ -105,7 +62,6 @@
(setq font-lock-defaults '(preserves-font-lock-keywords nil nil ()))
(make-local-variable 'indent-line-function)
(setq indent-line-function #'preserves-indent-line)
(setq syntax-propertize-function preserves-syntax-propertize-function)
)
(defvar preserves-indent-basic 2