bin/doom patch-macos: show "Patching X" message

This commit is contained in:
Henrik Lissner 2018-08-24 01:12:05 +02:00
parent 6b91039283
commit 08c09c2898
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -367,6 +367,7 @@ packages and regenerates the autoloads file."
((or doom-auto-accept ((or doom-auto-accept
(y-or-n-p (concat "/Applications/Emacs.app needs to be patched. See `bin/doom help patch-macos' for why and how.\n\n" (y-or-n-p (concat "/Applications/Emacs.app needs to be patched. See `bin/doom help patch-macos' for why and how.\n\n"
"Patch Emacs.app?"))) "Patch Emacs.app?")))
(message "Patching '%s'" appdir)
(copy-file oldbin newbin nil nil nil 'preserve-permissions) (copy-file oldbin newbin nil nil nil 'preserve-permissions)
(unless (file-exists-p newbin) (unless (file-exists-p newbin)
(error "Failed to copy %s to %s" oldbin newbin)) (error "Failed to copy %s to %s" oldbin newbin))