ryuslash/mode-icons
1
0
Fork 0
mirror of https://github.com/ryuslash/mode-icons.git synced 2024-11-22 01:50:28 +01:00
Code Issues Projects Releases Packages Wiki Activity

Allow gimp process to be killed without user intevention

Browse source
This commit is contained in:
Matthew L. Fidler 2016-08-05 09:20:40 -05:00
parent 19d5d68ecd
commit 5176a7fe46
1 changed files with 4 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
mode-icons.el
View file

@ -206,7 +206,8 @@ This was stole/modified from `c-save-buffer-state'"
("\\`Dockerfile\\'" "docker" xpm) ("\\`Dockerfile\\'" "docker" xpm)
("\\`Spacemacs buffer\\'" "spacemacs" png) ("\\`Spacemacs buffer\\'" "spacemacs" png)
("\\` ?emoji\\'" "emoji" png) ("\\` ?emoji\\'" "emoji" png)
(read-only #xf023 FontAwesome) ("\\`Org-Agenda" #xf046 FontAwesome)
(read-only #xf0n23 FontAwesome)
(writable #xf09c FontAwesome) (writable #xf09c FontAwesome)
(save #xf0c7 FontAwesome) (save #xf0c7 FontAwesome)
(saved "" nil) (saved "" nil)
@ -727,7 +728,8 @@ When nil, don't stop the gimp inferior mode.")
(save-excursion (save-excursion
(run-scheme (format "\"%s\" %s" mode-icons--gimp mode-icons--gimp-inferior-args)))) (run-scheme (format "\"%s\" %s" mode-icons--gimp mode-icons--gimp-inferior-args))))
(with-current-buffer (get-buffer "*scheme*") (with-current-buffer (get-buffer "*scheme*")
(rename-buffer "*mode-icons-gimp*"))))) (rename-buffer "*mode-icons-gimp*")
(set-process-query-on-exit-flag (get-buffer-process (get-buffer "*mode-icons-gimp*")) nil)))))
(defvar mode-icons--gimp-ready-p nil) (defvar mode-icons--gimp-ready-p nil)