branch: elpa/graphql-mode
commit c3471642f5b7f9363e6254b03b4e46795edc8147
Merge: 36b1a4ed9f 22cb9d4594
Author: David Vázquez Púa <[email protected]>
Commit: GitHub <[email protected]>
Merge pull request #19 from cbowdon/master
Support customizing the headers sent with the request
---
graphql-mode.el | 8 +++++++-
1 file changed, 7 insertions(+), 1 deletion(-)
diff --git a/graphql-mode.el b/graphql-mode.el
index 38b72275b5..5387c3c9fc 100644
--- a/graphql-mode.el
+++ b/graphql-mode.el
@@ -67,6 +67,12 @@
:type 'file
:group 'graphql)
+(defcustom graphql-headers '(("Content-Type" . "application/json"))
+ "Headers to send to the graphql endpoint."
+ :tag "GraphQL"
+ :type 'list
+ :group 'graphql)
+
(defun graphql-encode-json (query &optional operation variables)
"Put together a json like object with QUERY, OPERATION, and VARIABLES."
(let* ((body '()))
@@ -106,7 +112,7 @@ Please install it and try again."))
url
:type "POST"
:data body
- :headers '(("Content-Type" . "application/json"))
+ :headers graphql-headers
:parser 'json-read
:sync t
:complete (lambda (&rest _)
