From 3d08eb9053e905f2656f6d02dde6a588a4562c76 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 2 Aug 2020 22:40:18 +0100
Subject: [PATCH] Tokenizer: Fix handling of quoted keys

We can't just strip the quotes!  We may need to interpet \-escapes.
We can do this by calling tokenize_string.

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---
 TOML-Tiny/lib/TOML/Tiny/Tokenizer.pm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/TOML-Tiny/lib/TOML/Tiny/Tokenizer.pm b/TOML-Tiny/lib/TOML/Tiny/Tokenizer.pm
index b9b3ee4..0e9eb45 100644
--- a/TOML-Tiny/lib/TOML/Tiny/Tokenizer.pm
+++ b/TOML-Tiny/lib/TOML/Tiny/Tokenizer.pm
@@ -164,8 +164,7 @@ sub tokenize_key {
   my @keys = $toml =~ /($SimpleKey)\.?/g;
 
   for (@keys) {
-    s/^["']//;
-    s/["']$//;
+    $_ = $self->tokenize_string($_) if m/^['"]/;
   }
 
   return \@keys;
-- 
2.30.2