Use GITHUB_TOKEN to retrieve GitHub access token, instead of GITHUB_A…

…CCESS_TOKEN.
fukamachi · Sep 20, 2019 · c3abfe8 · c3abfe8
1 parent 32c64e7
commit c3abfe8
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/distify/github.lisp b/distify/github.lisp
@@ -24,14 +24,14 @@
 (in-package #:qlot/distify/github)
 
 (defun retrieve-from-github (repos action)
-  (let ((github-access-token (uiop:getenv "GITHUB_ACCESS_TOKEN")))
+  (let ((github-token (uiop:getenv "GITHUB_TOKEN")))
     (yason:parse
      (apply #'dex:get
             (format nil "https://api.github.com/repos/~A/~A" repos action)
             :want-stream t
             :proxy *proxy*
-            (if github-access-token
-                (list :basic-auth (cons github-access-token "x-oauth-basic"))
+            (if github-token
+                (list :basic-auth (cons github-token "x-oauth-basic"))
                 '())))))
 
 (defun retrieve-source-git-ref-from-github (source)