From c42e3143d07a16993db3c1995d75f2d185870215 Mon Sep 17 00:00:00 2001
From: Jeff Ober <jober@ziprecruiter.com>
Date: Fri, 17 Jan 2020 10:06:46 -0500
Subject: [PATCH] Fix bug in generation of quoted keys containing quotes
 themselves

---
 lib/TOML/Tiny/Writer.pm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/lib/TOML/Tiny/Writer.pm b/lib/TOML/Tiny/Writer.pm
index 7c3067b..f5ee59f 100644
--- a/lib/TOML/Tiny/Writer.pm
+++ b/lib/TOML/Tiny/Writer.pm
@@ -157,7 +157,11 @@ sub to_toml_key {
     return $str;
   }
 
-  return qq{"$str"};
+  if ($str =~ /^"/) {
+    return qq{'$str'};
+  } else {
+    return qq{"$str"};
+  }
 }
 
 sub to_toml_string {
-- 
2.30.2