-
Notifications
You must be signed in to change notification settings - Fork 30
/
gitlab-session.el
43 lines (30 loc) · 1.33 KB
/
gitlab-session.el
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
;;; gitlab-session.el --- Session API
;; Copyright (C) 2014, 2015, 2016 Nicolas Lamirault <[email protected]>
;; This program is free software; you can redistribute it and/or
;; modify it under the terms of the GNU General Public License
;; as published by the Free Software Foundation; either version 2
;; of the License, or (at your option) any later version.
;; This program is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;; GNU General Public License for more details.
;; You should have received a copy of the GNU General Public License
;; along with this program; if not, write to the Free Software
;; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
;; 02110-1301, USA.
;;; Commentary:
;; See API doc :
;; https://github.com/gitlabhq/gitlabhq/blob/master/doc/api/session.md
;;; Code:
(require 'gitlab-http)
(require 'gitlab-utils)
;;;###autoload
(defmacro with-gitlab-auth (&rest body)
"Macro which checks authentication token. If not defined, signals an
error. Otherwise, executes `BODY'."
`(progn
(when (s-blank? gitlab-token-id)
(error "You must set gitlab-token-id to your private token."))
,@body))
(provide 'gitlab-session)
;;; gitlab-session.el ends here