alx/mu4e
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Merge pull request #283 from stsquad/history-aware-git-apply

Browse Source 
* mu4e-actions.el: make git apply patch history aware
This commit is contained in:
Dirk-Jan C. Binnema
2013-10-07 20:51:17 -07:00
parent 59c74e0f34 128a17b87e
commit fee25f4c71
1 changed files with 4 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
mu4e/mu4e-actions.el
View File

@ -170,7 +170,10 @@ store your org-contacts."
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defun mu4e-action-git-apply-patch (msg) (defun mu4e-action-git-apply-patch (msg)
"Apply the git [patch] message." "Apply the git [patch] message."
(let ((path (read-directory-name "Target directory: " nil "~/" t) )) (let ((path (ido-read-directory-name "Target directory: "
(car ido-work-directory-list)
"~/" t)))
(add-to-list 'ido-work-directory-list path)
(shell-command (shell-command
(format "cd %s; git apply %s" (format "cd %s; git apply %s"
path path