affine/flesh
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

rename relish to flesh

Browse source
This commit is contained in:
Ava Apples Affine 2024-02-06 22:39:08 +00:00
parent 415b1181fa
commit 9b447eb5b7
58 changed files with 252 additions and 245 deletions
Download patch file Download diff file Expand all files Collapse all files

22
snippets/relish-mode.el
View file

@ -1,7 +1,7 @@
;;; relish-mode.el --- sample major mode for editing Relish. -*- coding: utf-8; lexical-binding: t; -*-
;;; flesh-mode.el --- Flesh -*- coding: utf-8; lexical-binding: t; -*-
;; Copyright © 2017, by Ava Hahn
;; Author: Ava Hahn (ava@sunnypup.io)
;; Copyright © 2023, by Ava Affine
;; Author: Ava Affine (ava@sunnypup.io)
;; Version: 1
;; Keywords: languages
@ -12,7 +12,7 @@
;;; Code:
(setq relish-keywords
(setq flesh-keywords
(let* (
(r-control-flow '("if" "let" "circuit" "while" "assert" "exit"))
(r-declaration '("lambda" "q" "quote" "def" "get-doc" "set-doc" "set?"))
@ -53,7 +53,7 @@
(,r-userlib-regexp . 'font-lock-function-name-face)
)))
(setq relish-mode-syntax-table
(setq flesh-mode-syntax-table
(let ((table (make-syntax-table)))
;; string delims
(modify-syntax-entry ?' "\"" table)
@ -68,12 +68,12 @@
(define-derived-mode relish-mode
text-mode
"Major mode for editing Relish"
:syntax-table relish-mode-syntax-table
(setq font-lock-defaults '((relish-keywords))))
"Flesh"
:syntax-table flesh-mode-syntax-table
(setq font-lock-defaults '((flesh-keywords))))
(add-to-list 'auto-mode-alist '("\\.rls\\'" . relish-mode))
(add-to-list 'auto-mode-alist '(".relishrc" . relish-mode))
(add-to-list 'auto-mode-alist '("\\.f\\'" . relish-mode))
(add-to-list 'auto-mode-alist '(".fleshrc" . relish-mode))
(provide 'relish-mode)
;;; relish-mode.el ends here
;;; flesh-mode.el ends here