branch: externals/yaml
commit 706518f5f4a5f7348d34b2163f01afd814038e89
Author: Zachary Romero <zacrom...@posteo.net>
Commit: Zachary Romero <zacrom...@posteo.net>

    update workflow pipeline
---
 .github/workflows/test.yml | 8 +-------
 yaml.el                    | 8 ++++----
 2 files changed, 5 insertions(+), 11 deletions(-)

diff --git a/.github/workflows/test.yml b/.github/workflows/test.yml
index 87feac739d..e920f2fec3 100644
--- a/.github/workflows/test.yml
+++ b/.github/workflows/test.yml
@@ -7,14 +7,8 @@ jobs:
     steps:
     - uses: purcell/setup-emacs@master
       with:
-        version: 26.3
+        version: 27.2
     - uses: actions/checkout@v2
     - name: Run tests
       run: |
         emacs -Q --batch -L . -l *-tests.el -f ert-run-tests-batch-and-exit
-    - uses: purcell/setup-emacs@master
-      with:
-        version: 25.1
-    - name: Run tests
-      run: |
-        emacs -Q --batch -L . -l *-tests.el -f ert-run-tests-batch-and-exit
diff --git a/yaml.el b/yaml.el
index 7325096d0e..2b830b9464 100644
--- a/yaml.el
+++ b/yaml.el
@@ -1095,20 +1095,20 @@ changes in the future."
   "Parse YAML grammar for given STATE and ARGS.
 
 Rules for this function are defined by the yaml-spec JSON file."
-  (let* ((name (symbol-name state))
+  (let ((name (symbol-name state))
          (beg yaml--parsing-position)
          (_ (when (and yaml--parse-debug
-                       (not (member name yaml--tracing-ignore)))
+                       (not (member (symbol-name state) yaml--tracing-ignore)))
               (message "|%s>%s %40s args=%s '%s'"
                        (make-string (length yaml--states) ?-)
                        (make-string (- 70 (length yaml--states)) ?\s)
-                       name
+                       (symbol-name state)
                        args
                        (replace-regexp-in-string
                         "\n"
                         "↓"
                         (yaml--slice yaml--parsing-position)))))
-         (_ (yaml--push-state name))
+         (_ (yaml--push-state (symbol-name state)))
          (yaml-n)
          (res))
     (pcase state

Reply via email to