From 938adbfe446e7f4a4e45b9dd27b5cf2e7ee4070c Mon Sep 17 00:00:00 2001
From: Bruce Hill <bruce@bruce-hill.com>
Date: Wed, 20 Mar 2019 16:16:41 -0700
Subject: Switching more verbose ("Action" tree with "foo" $x) syntax to `(foo
 `$x) when possible

---
 lib/compatibility/5.13.nom | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'lib/compatibility/5.13.nom')

diff --git a/lib/compatibility/5.13.nom b/lib/compatibility/5.13.nom
index c2ab90e..3073fdf 100644
--- a/lib/compatibility/5.13.nom
+++ b/lib/compatibility/5.13.nom
@@ -17,6 +17,6 @@ upgrade action "with" to "5.13" via
             when:
                 (($a.type == "DictEntry") and (#$a == 1)): $a = $a.1
                 (all of [$a.type == "DictEntry", #$a == 2]):
-                    $a = ("Action" tree with $a.1 "=" $a.2)
+                    $a = `(`$a.1 = `$a.2)
             $new_assignments.$i = $a
-        return ("Action" tree with "with" $new_assignments $body)
+        return `(with `$new_assignments `$body)
-- 
cgit v1.2.3