[nongnu] elpa/graphql-mode 26a5d8a665 043/122: make graphql-current-* function, not command. also graphql-begining-of-variables

[ELPA Syncer]

branch: elpa/graphql-mode
commit 26a5d8a665c16f5daac8506b0d44a6684d963d4d
Author: Tim Shiu <punshiu@fb.com>
Commit: Tim Shiu <punshiu@fb.com>

    make graphql-current-* function, not command. also 
graphql-begining-of-variables
---
 graphql-mode.el | 10 ++++------
 1 file changed, 4 insertions(+), 6 deletions(-)

diff --git a/graphql-mode.el b/graphql-mode.el
index 5e91075f4f..aa2dcb7afe 100644
--- a/graphql-mode.el
+++ b/graphql-mode.el
@@ -53,12 +53,14 @@
   "Number of spaces for each indentation step in `graphql-mode'."
   :tag "GraphQL"
   :type 'integer
-  :safe 'integerp)
+  :safe 'integerp
+  :group 'graphql)
 
 (defcustom graphql-url "http://localhost:8000/graphql";
   "URL address of the graphql server endpoint."
   :tag "GraphQL"
-  :type 'string)
+  :type 'string
+  :group 'graphql)
 
 (defun graphql--query (query operation variables)
   "Send QUERY to the server at `graphql-url' and return the
@@ -93,7 +95,6 @@ response from the server."
 
 (defun graphql-current-query ()
   "find out the current query/mutation/subscription"
-  (interactive)
   (let ((start
          (save-excursion
            (graphql-beginning-of-query)
@@ -106,7 +107,6 @@ response from the server."
 
 (defun graphql-current-operation ()
   "get the name of the query operation"
-  (interactive)
   (let* ((query
          (save-excursion
            (replace-regexp-in-string "^[ \t\n]*" "" (graphql-current-query))))
@@ -120,7 +120,6 @@ response from the server."
  
 (defun graphql-current-variables ()
   "get the content of graphql variables"
-  (interactive)
   (let ((variables
          (save-excursion
            (goto-char (point-max))
@@ -133,7 +132,6 @@ response from the server."
 
 (defun graphql-beginning-of-variables ()
   "get the beginning point of graphql variables"
-  (interactive)
   (save-excursion
     (goto-char (point-max))
     (search-backward-regexp "^variables" (point-min) t)