如何处理windows terminal 字符集和elisp调用乱码问题

Emacs-Lisp
1 
(defun dian-git-commit-easy-edition (commit-message)
  "简化版本提交git"
  (interactive "s Message? ")
  (message "Message, %s" commit-message)
  (shell-command   (concat "cd " (projectile-acquire-root) " && " "git add \. && " "git commit -m\"" commit-message "\""))

如上面,可以交互式的调用添加信息,然后提交,让shell执行相关命令,但是由于windows 和emacs字符集不匹配,提交之后就是乱码,应该怎么修改

(set-locale-environment "en_US.UTF-8")

这个是我唯一有关字符集的配置