tests: fix assignment in perl script generator

2026-06-21 02:16:38 +02:00 · 2022-08-02 20:55:36 +02:00
parent 2ed281af02
commit 3bc0453cae
1 changed files with 1 additions and 1 deletions
@@ -329,7 +329,7 @@ class UnparsePerl(UnparsePython):
        """Add an AST Assign in output."""
        self.add(
            self.fill,
-            (self.prefix, '%' if isinstance(node.value, ast.Dict) else '$'),
+            (self.prefix, '$'),
            [[target, ' = '] for target in node.targets],
            (self.prefix, None),
            node.value,