Write test for fragments with snake cased name

Author: tomhoule

graphql_client/tests/fragments.rs

@@ -13,6 +13,13 @@ extern crate serde_json;
 )]
 pub struct FragmentReference;
 
+#[derive(GraphQLQuery)]
+#[graphql(
+    query_path = "tests/fragments/query.graphql",
+    schema_path = "tests/fragments/schema.graphql"
+)]
+pub struct SnakeCaseFragment;
+
 #[test]
 fn fragment_reference() {
     let valid_response = json!({
@@ -30,3 +37,21 @@ fn fragment_reference() {
         "value"
     );
 }
+
+#[test]
+fn fragments_with_snake_case_name() {
+    let valid_response = json!({
+        "inFragment": "value",
+    });
+
+    let valid_fragment_reference =
+        serde_json::from_value::<snake_case_fragment::ResponseData>(valid_response).unwrap();
+
+    assert_eq!(
+        valid_fragment_reference
+            .snake_case_fragment
+            .in_fragment
+            .unwrap(),
+        "value"
+    );
+}

graphql_client/tests/fragments/query.graphql

@@ -2,6 +2,14 @@ fragment FragmentReference on QueryRoot {
   inFragment
 }
 
+fragment snake_case_fragment on QueryRoot {
+  inFragment
+}
+
 query FragmentReference {
   ...FragmentReference
 }
+
+query SnakeCaseFragment {
+  ...snake_case_fragment
+}