Add workaround for magit/forge#720

Signed-off-by: Björn Bidar <[email protected]>
Thaodan · Nov 3, 2024 · 7fbb428 · 7fbb428
1 parent 23d1cd6
commit 7fbb428
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lisp/ghub.el b/lisp/ghub.el
@@ -775,7 +775,7 @@ and call `auth-source-forget+'."
   (let* ((user (ghub--ident username package))
          (token
           (or (car (ghub--auth-source-get (list :secret)
-                     :host host :user user))
+                     :host (url-host (url-generic-parse-url (concat "//" host))) :user user))
               (progn
                 ;; Auth-Source caches the information that there is no
                 ;; value, but in our case that is a situation that needs