[elpa] externals/graphql 1f4f1a61c9 11/56: Remove graphql-encode and replace it with graphql--encode

[ELPA Syncer]

branch: externals/graphql
commit 1f4f1a61c9cb44e6d98faaf822da25f70fabaad3
Author: Sean Allred <code@seanallred.com>
Commit: Sean Allred <code@seanallred.com>

    Remove graphql-encode and replace it with graphql--encode
    
    Weird text properties no longer seem to be a problem.
---
 graphql.el | 10 ++--------
 1 file changed, 2 insertions(+), 8 deletions(-)

diff --git a/graphql.el b/graphql.el
index 0eb621bd50..7e6ab60e6b 100644
--- a/graphql.el
+++ b/graphql.el
@@ -72,7 +72,7 @@
         (push (pop g) graph)))
     (list keys (nreverse graph))))
 
-(defun graphql--encode (g)
+(defun graphql-encode (g)
   "Encode G as a GraphQL string."
   (or (graphql--encode-atom g)
       (graphql--encode-list g)
@@ -92,14 +92,8 @@
               (format " %S" name))
             (when fields
               (format " { %s }"
-                      (mapconcat #'graphql--encode fields " ")))))))))
+                      (mapconcat #'graphql-encode fields " ")))))))))
 
-(defun graphql-encode (g)
-  "Encode G as a GraphQL string."
-  (let ((s (graphql--encode g)))
-    ;; clean up
-    (set-text-properties 0 (length s) nil s)
-    s))
 
 (provide 'graphql)
 ;;; graphql.el ends here