[nongnu] elpa/geiser-stklos d3caaf3e8e 2/4: Add symbols to the highlited list

[ELPA Syncer]

branch: elpa/geiser-stklos
commit d3caaf3e8e9ca7789554f6579c08970af69a6c38
Author: Jeronimo Pellegrini <j_p@aleph0.info>
Commit: Jeronimo Pellegrini <j_p@aleph0.info>

    Add symbols to the highlited list
---
 geiser-stklos.el | 19 ++++++++++++++++++-
 1 file changed, 18 insertions(+), 1 deletion(-)

diff --git a/geiser-stklos.el b/geiser-stklos.el
index 2e8914fdfd..5f8566f2d8 100644
--- a/geiser-stklos.el
+++ b/geiser-stklos.el
@@ -378,9 +378,26 @@ Argument BINARY is a string containing the binary name."
     "define-struct"
     "dotimes"
     "fluid-let"
+    "include-file"
     "macro-expand"
+    "match-case"
     "repeat"
+    "require-extension"
+    "require-feature"
+    "require-for-syntax"
+    "require-library"
     "tagbody"
+    "until"
+    "when-compile"
+    "when-load-and-compile"
+    "with-error-to-file"
+    "with-error-to-port"
+    "with-input-from-port"
+    "with-input-from-string"
+    "with-mutex"
+    "with-output-to-port"
+    "with-output-to-string"
+    "while"
     "with-handler" )
     "These are symbols that we want to be highlighted in STklos code.")
 
@@ -416,7 +433,7 @@ standard Scheme ones."
   (unsupported            '(callers callees))            ; doesn't seem to 
make any difference?
   )
 
-;; STklos files are .stk, and we may wat to open .scm files with STklos also:
+;; STklos files are .stk, and we may want to open .scm files with STklos also:
 ;;
 (geiser-implementation-extension 'stklos "scm")
 (geiser-implementation-extension 'stklos "stk")