mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-01-30 12:21:25 -08:00
Fix font and indentation of call-with-port in scheme-mode
* lisp/progmodes/scheme.el (scheme-font-lock-keywords-2): Add call-with-port (bug#48544). (call-with-port): Indent correctly.
This commit is contained in:
parent
df17725c80
commit
0d91c2ddae
1 changed files with 4 additions and 1 deletions
|
|
@ -299,7 +299,9 @@ See `run-hooks'."
|
|||
(concat
|
||||
"(" (regexp-opt
|
||||
'("begin" "call-with-current-continuation" "call/cc"
|
||||
"call-with-input-file" "call-with-output-file" "case" "cond"
|
||||
"call-with-input-file" "call-with-output-file"
|
||||
"call-with-port"
|
||||
"case" "cond"
|
||||
"do" "else" "for-each" "if" "lambda" "λ"
|
||||
"let" "let*" "let-syntax" "letrec" "letrec-syntax"
|
||||
;; R6RS library subforms.
|
||||
|
|
@ -542,6 +544,7 @@ indentation."
|
|||
(put 'library 'scheme-indent-function 1) ; R6RS
|
||||
|
||||
(put 'call-with-input-file 'scheme-indent-function 1)
|
||||
(put 'call-with-port 'scheme-indent-function 1)
|
||||
(put 'with-input-from-file 'scheme-indent-function 1)
|
||||
(put 'with-input-from-port 'scheme-indent-function 1)
|
||||
(put 'call-with-output-file 'scheme-indent-function 1)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue