4545
4646(require 'f )
4747(require 'editorconfig )
48+
4849(require 'copilot-balancer )
4950
5051(defgroup copilot nil
@@ -60,7 +61,8 @@ Disable idle completion if set to nil."
6061 :type '(choice
6162 (number :tag " Seconds of delay" )
6263 (const :tag " Idle completion disabled" nil ))
63- :group 'copilot )
64+ :group 'copilot
65+ :package-version '(copilot . " 0.1" ))
6466
6567(defcustom copilot-network-proxy nil
6668 " Network proxy to use for Copilot.
@@ -77,14 +79,16 @@ to disable TLS verification. This can be done by setting a pair
7779 (:host \" 127.0.0.1\" :port 80 :rejectUnauthorized :json-false)"
7880 :type '(plist :tag " Uncheck all to disable proxy" :key-type symbol)
7981 :options '((:host string) (:port integer) (:username string) (:password string))
80- :group 'copilot )
82+ :group 'copilot
83+ :package-version '(copilot . " 0.1" ))
8184
8285(defcustom copilot-log-max 0
8386 " Max size of events buffer.
84870 disables, nil means infinite. Enabling event logging may slightly affect
8588performance."
8689 :group 'copilot
87- :type 'integer )
90+ :type 'integer
91+ :package-version '(copilot . " 0.1" ))
8892
8993(defcustom copilot-server-log-level 0
9094 " Log level of the Copilot server.
@@ -94,36 +98,42 @@ performance."
94983 - info
95994 - debug"
96100 :group 'copilot
97- :type 'integer )
101+ :type 'integer
102+ :package-version '(copilot . " 0.1" ))
98103
99104(defcustom copilot-server-args '(" --stdio" )
100105 " Additional arguments to pass to the Copilot server."
101106 :group 'copilot
102- :type '(repeat string))
107+ :type '(repeat string)
108+ :package-version '(copilot . " 0.1" ))
103109
104110(defcustom copilot-max-char 100000
105111 " Maximum number of characters to send to Copilot, -1 means no limit."
106112 :group 'copilot
107- :type 'integer )
113+ :type 'integer
114+ :package-version '(copilot . " 0.1" ))
108115
109116
110117(defcustom copilot-clear-overlay-ignore-commands nil
111118 " List of commands that should not clear the overlay when called."
112119 :group 'copilot
113- :type '(repeat function))
120+ :type '(repeat function)
121+ :package-version '(copilot . " 0.1" ))
114122
115123(defcustom copilot-indent-offset-warning-disable nil
116124 " Disable indentation warnings.
117125
118126Warning occurs when the function `copilot--infer-indentation-offset' cannot
119127find indentation offset."
120128 :group 'copilot
121- :type 'boolean )
129+ :type 'boolean
130+ :package-version '(copilot . " 0.1" ))
122131
123132(defcustom copilot-max-char-warning-disable nil
124133 " When non-nil, disable warning about buffer size exceeding `copilot-max-char' ."
125134 :group 'copilot
126- :type 'boolean )
135+ :type 'boolean
136+ :package-version '(copilot . " 0.1" ))
127137
128138(defcustom copilot-indentation-alist
129139 (append '((emacs-lisp-mode lisp-indent-offset)
@@ -136,7 +146,8 @@ find indentation offset."
136146 editorconfig-indentation-alist)
137147 " Alist of `major-mode' to indentation map with optional fallbacks."
138148 :type '(alist :key-type symbol :value-type (choice integer symbol))
139- :group 'copilot )
149+ :group 'copilot
150+ :package-version '(copilot . " 0.1" ))
140151
141152(defconst copilot-server-package-name " @github/copilot-language-server"
142153 " The name of the package to install copilot server." )
@@ -146,12 +157,14 @@ find indentation offset."
146157 " Directory in which the servers will be installed."
147158 :risky t
148159 :type 'directory
149- :group 'copilot )
160+ :group 'copilot
161+ :package-version '(copilot . " 0.1" ))
150162
151163(defcustom copilot-server-executable " copilot-language-server"
152164 " The executable of copilot server."
153165 :type 'string
154- :group 'copilot )
166+ :group 'copilot
167+ :package-version '(copilot . " 0.1" ))
155168
156169(defcustom copilot-version nil
157170 " Copilot server version.
@@ -160,7 +173,8 @@ The default value is the preferred version and ensures functionality.
160173You may adjust this variable at your own risk."
161174 :type '(choice (const :tag " Latest" nil )
162175 (string :tag " Specific Version" ))
163- :group 'copilot )
176+ :group 'copilot
177+ :package-version '(copilot . " 0.1" ))
164178
165179(defvar-local copilot--overlay nil
166180 " Overlay for Copilot completion." )
@@ -1023,25 +1037,29 @@ Arguments BEG, END, and CHARS-REPLACED are metadata for region changed."
10231037 " A list of predicate functions with no argument to disable Copilot.
10241038Copilot will not be triggered if any predicate returns t."
10251039 :type '(repeat function)
1026- :group 'copilot )
1040+ :group 'copilot
1041+ :package-version '(copilot . " 0.1" ))
10271042
10281043(defcustom copilot-enable-predicates '(evil-insert-state-p copilot--buffer-changed)
10291044 " A list of predicate functions with no argument to enable Copilot.
10301045Copilot will be triggered only if all predicates return t."
10311046 :type '(repeat function)
1032- :group 'copilot )
1047+ :group 'copilot
1048+ :package-version '(copilot . " 0.1" ))
10331049
10341050(defcustom copilot-disable-display-predicates nil
10351051 " A list of predicate functions with no argument to disable Copilot.
10361052Copilot will not show completions if any predicate returns t."
10371053 :type '(repeat function)
1038- :group 'copilot )
1054+ :group 'copilot
1055+ :package-version '(copilot . " 0.1" ))
10391056
10401057(defcustom copilot-enable-display-predicates nil
10411058 " A list of predicate functions with no argument to enable Copilot.
10421059Copilot will show completions only if all predicates return t."
10431060 :type '(repeat function)
1044- :group 'copilot )
1061+ :group 'copilot
1062+ :package-version '(copilot . " 0.1" ))
10451063
10461064(defmacro copilot--satisfy-predicates (enable disable )
10471065 " Return t if satisfy all predicates in ENABLE and none in DISABLE."
0 commit comments