mirror of
https://github.com/weechat/weechat.git
synced 2026-06-25 04:16:38 +02:00
tests: escape "@" in Perl strings
This commit is contained in:
@@ -464,7 +464,7 @@ class UnparsePerl(UnparsePython):
|
||||
|
||||
def _ast_str(self, node):
|
||||
"""Add an AST Str in output."""
|
||||
self.add('"%s"' % node.s.replace('$', '\\$'))
|
||||
self.add('"%s"' % node.s.replace('$', '\\$').replace('@', '\\@'))
|
||||
|
||||
|
||||
class UnparseRuby(UnparsePython):
|
||||
|
||||
Reference in New Issue
Block a user