mirror of https://github.com/Chizi123/.emacs.d.git

Chizi123
2018-11-21 5ddac8bd2392ec5b64392e8750d725029bf5aa79
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
;ELC
;;; Compiled
;;; in Emacs version 26.1
;;; with all optimizations.
 
;;; This file uses dynamic docstrings, first added in Emacs 19.29.
 
;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 
(require 'ghub)
#@58 The default host that is used if `gtea.host' is not set.
(defconst gtea-default-host "localhost:3000/api/v1" (#$ . 424))
#@283 Make a `GET' request for RESOURCE, with optional query PARAMS.
Like calling `ghub-request' (which see) with "GET" as METHOD
and `gitea' as FORGE.
 
(fn RESOURCE &optional PARAMS &key QUERY PAYLOAD HEADERS SILENT UNPAGINATE NOERROR READER USERNAME AUTH HOST CALLBACK ERRORBACK EXTRA)
(defalias 'gtea-get #[641 "\300\301\"A@\300\302\"A@\300\303\"A@\300\304\"A@\300\305\"A@\300\306\"A@\300\307\"A@\300\310\"A@\300    \311\"A@\300\n\312\"A@\300 \313\"A@\300\f\314\"A@\300 \315\"A@ \211\203\203\211@\316>\203k\211AA\262\202X\317>A@\203z\320\262\202X\321\322@\"\210\202X\210\323\324\325\326\301\302\303\304\305\306\307\310\311\312\313\314\315&\207" [plist-member :query :payload :headers :silent :unpaginate :noerror :reader :username :auth :host :callback :errorback :extra (:query :payload :headers :silent :unpaginate :noerror :reader :username :auth :host :callback :errorback :extra :allow-other-keys) :allow-other-keys nil error "Keyword argument %s not one of (:query :payload :headers :silent :unpaginate :noerror :reader :username :auth :host :callback :errorback :extra)" ghub-request "GET" :forge gitea] 48 (#$ . 552)])
#@285 Make a `PUT' request for RESOURCE, with optional payload PARAMS.
Like calling `ghub-request' (which see) with "PUT" as METHOD
and `gitea' as FORGE.
 
(fn RESOURCE &optional PARAMS &key QUERY PAYLOAD HEADERS SILENT UNPAGINATE NOERROR READER USERNAME AUTH HOST CALLBACK ERRORBACK EXTRA)
(defalias 'gtea-put #[641 "\300\301\"A@\300\302\"A@\300\303\"A@\300\304\"A@\300\305\"A@\300\306\"A@\300\307\"A@\300\310\"A@\300    \311\"A@\300\n\312\"A@\300 \313\"A@\300\f\314\"A@\300 \315\"A@ \211\203\203\211@\316>\203k\211AA\262\202X\317>A@\203z\320\262\202X\321\322@\"\210\202X\210\323\324\325\326\301\302\303\304\305\306\307\310\311\312\313\314\315&\207" [plist-member :query :payload :headers :silent :unpaginate :noerror :reader :username :auth :host :callback :errorback :extra (:query :payload :headers :silent :unpaginate :noerror :reader :username :auth :host :callback :errorback :extra :allow-other-keys) :allow-other-keys nil error "Keyword argument %s not one of (:query :payload :headers :silent :unpaginate :noerror :reader :username :auth :host :callback :errorback :extra)" ghub-request "PUT" :forge gitea] 48 (#$ . 1739)])
#@287 Make a `POST' request for RESOURCE, with optional payload PARAMS.
Like calling `ghub-request' (which see) with "POST" as METHOD
and `gitea' as FORGE.
 
(fn RESOURCE &optional PARAMS &key QUERY PAYLOAD HEADERS SILENT UNPAGINATE NOERROR READER USERNAME AUTH HOST CALLBACK ERRORBACK EXTRA)
(defalias 'gtea-post #[641 "\300\301\"A@\300\302\"A@\300\303\"A@\300\304\"A@\300\305\"A@\300\306\"A@\300\307\"A@\300\310\"A@\300    \311\"A@\300\n\312\"A@\300 \313\"A@\300\f\314\"A@\300 \315\"A@ \211\203\203\211@\316>\203k\211AA\262\202X\317>A@\203z\320\262\202X\321\322@\"\210\202X\210\323\324\325\326\301\302\303\304\305\306\307\310\311\312\313\314\315&\207" [plist-member :query :payload :headers :silent :unpaginate :noerror :reader :username :auth :host :callback :errorback :extra (:query :payload :headers :silent :unpaginate :noerror :reader :username :auth :host :callback :errorback :extra :allow-other-keys) :allow-other-keys nil error "Keyword argument %s not one of (:query :payload :headers :silent :unpaginate :noerror :reader :username :auth :host :callback :errorback :extra)" ghub-request "POST" :forge gitea] 48 (#$ . 2929)])
#@289 Make a `PATCH' request for RESOURCE, with optional payload PARAMS.
Like calling `ghub-request' (which see) with "PATCH" as METHOD
and `gitea' as FORGE.
 
(fn RESOURCE &optional PARAMS &key QUERY PAYLOAD HEADERS SILENT UNPAGINATE NOERROR READER USERNAME AUTH HOST CALLBACK ERRORBACK EXTRA)
(defalias 'gtea-patch #[641 "\300\301\"A@\300\302\"A@\300\303\"A@\300\304\"A@\300\305\"A@\300\306\"A@\300\307\"A@\300\310\"A@\300    \311\"A@\300\n\312\"A@\300 \313\"A@\300\f\314\"A@\300 \315\"A@ \211\203\203\211@\316>\203k\211AA\262\202X\317>A@\203z\320\262\202X\321\322@\"\210\202X\210\323\324\325\326\301\302\303\304\305\306\307\310\311\312\313\314\315&\207" [plist-member :query :payload :headers :silent :unpaginate :noerror :reader :username :auth :host :callback :errorback :extra (:query :payload :headers :silent :unpaginate :noerror :reader :username :auth :host :callback :errorback :extra :allow-other-keys) :allow-other-keys nil error "Keyword argument %s not one of (:query :payload :headers :silent :unpaginate :noerror :reader :username :auth :host :callback :errorback :extra)" ghub-request "PATCH" :forge gitea] 48 (#$ . 4123)])
#@291 Make a `DELETE' request for RESOURCE, with optional payload PARAMS.
Like calling `ghub-request' (which see) with "DELETE" as METHOD
and `gitea' as FORGE.
 
(fn RESOURCE &optional PARAMS &key QUERY PAYLOAD HEADERS SILENT UNPAGINATE NOERROR READER USERNAME AUTH HOST CALLBACK ERRORBACK EXTRA)
(defalias 'gtea-delete #[641 "\300\301\"A@\300\302\"A@\300\303\"A@\300\304\"A@\300\305\"A@\300\306\"A@\300\307\"A@\300\310\"A@\300    \311\"A@\300\n\312\"A@\300 \313\"A@\300\f\314\"A@\300 \315\"A@ \211\203\203\211@\316>\203k\211AA\262\202X\317>A@\203z\320\262\202X\321\322@\"\210\202X\210\323\324\325\326\301\302\303\304\305\306\307\310\311\312\313\314\315&\207" [plist-member :query :payload :headers :silent :unpaginate :noerror :reader :username :auth :host :callback :errorback :extra (:query :payload :headers :silent :unpaginate :noerror :reader :username :auth :host :callback :errorback :extra :allow-other-keys) :allow-other-keys nil error "Keyword argument %s not one of (:query :payload :headers :silent :unpaginate :noerror :reader :username :auth :host :callback :errorback :extra)" ghub-request "DELETE" :forge gitea] 48 (#$ . 5321)])
#@265 Make a request for RESOURCE and return the response body.
Like calling `ghub-request' (which see) with `gitea' as FORGE.
 
(fn METHOD RESOURCE &optional PARAMS &key QUERY PAYLOAD HEADERS SILENT UNPAGINATE NOERROR READER USERNAME AUTH HOST CALLBACK ERRORBACK EXTRA)
(defalias 'gtea-request #[898 "\300\301\"A@\300\302\"A@\300\303\"A@\300\304\"A@\300\305\"A@\300\306\"A@\300\307\"A@\300\310\"A@\300    \311\"A@\300\n\312\"A@\300 \313\"A@\300\f\314\"A@\300 \315\"A@ \211\203\203\211@\316>\203k\211AA\262\202X\317>A@\203z\320\262\202X\321\322@\"\210\202X\210\323\324\325\301\302\303\304\305\306\307\310\311\312\313\314\315&\207" [plist-member :query :payload :headers :silent :unpaginate :noerror :reader :username :auth :host :callback :errorback :extra (:query :payload :headers :silent :unpaginate :noerror :reader :username :auth :host :callback :errorback :extra :allow-other-keys) :allow-other-keys nil error "Keyword argument %s not one of (:query :payload :headers :silent :unpaginate :noerror :reader :username :auth :host :callback :errorback :extra)" ghub-request :forge gitea] 49 (#$ . 6523)])
#@109 Return the id of the repository specified by OWNER, NAME and HOST.
 
(fn OWNER NAME &key USERNAME AUTH HOST)
(defalias 'gtea-repository-id #[642 "\300\301\"A@\300\302\"A@\300\303\"A@\211\203=\211@\304>\203&\211AA\262\202\305>A@\2034\306\262\202\307\310@\"\210\202\210\311\312\313\314\315\n\n#\306\301\302    \303\n&\236A!\207" [plist-member :username :auth :host (:username :auth :host :allow-other-keys) :allow-other-keys nil error "Keyword argument %s not one of (:username :auth :host)" number-to-string id gtea-get format "/repos/%s/%s"] 17 (#$ . 7689)])
(provide 'gtea)