将 straight.el 中的 "github.com" 转化为 "github.com.cnpmjs.org"

Emacs-general
1 
(advice-add 'straight-vc-git--encode-url :around #'noalias-set-github-mirror)
(defun noalias-set-github-mirror (oldfunc &rest args)
   (let ((url (apply oldfunc args)))
      (replace-regexp-in-string (rx (group "github.com"))
                                "github.com.cnpmjs.org" url nil nil 1)))

希望有所帮助

5 个赞
2

谢谢呀。我是直接修改 .gitconfig 。不知道二者有何区别？

3

哦，那样的话，似乎不能push自己的代码了

4

可能还得把 git 的协议设为 https

(setq straight-vc-git-default-protocol 'https)
1 个赞
5
1 个赞
6

拉取用 https，推送用 ssh，不冲突。

7

感谢，这样子设置仅在 straight.el 生效，对我来说刚刚好。