emacs-emojify

commit ca487585aa456055eeeb9ff3df4c3b565c135c94
parent 94d9b54b79dca8a0beacb0b180b1dae1fb8d3e8a
Author: Iqbal Ansari <iqbalansari02@yahoo.com>
Date:   Sun,  1 Nov 2015 13:02:13 +0530

Improve definition of emojify-inhibit-major-modes

This change allows inhibiting emojification even in derived modes

Diffstat:
M
emojify.el
 | 
9
+++++----

1 file changed, 5 insertions(+), 4 deletions(-)
diff --git a/emojify.el b/emojify.el
@@ -98,7 +98,9 @@ Possible values are
     pdf-view-mode
     image-mode
     help-mode
-    magit-popup-mode)
+    magit-popup-mode
+    ert-results-mode
+    compilation-mode)
   "Major modes where emojify mode should not be enabled."
   :type '(repeat symbol)
   :group 'emojify)
@@ -121,9 +123,8 @@ a non-nil value."
   "Determine if user has disabled the `major-mode' enabled for the BUFFER.
 
 Returns non-nil if the buffer's major mode is part of `emojify-inhibit-major-modes'"
-  (memq (with-current-buffer buffer
-          major-mode)
-        emojify-inhibit-major-modes))
+  (with-current-buffer buffer
+    (apply #'derived-mode-p emojify-inhibit-major-modes)))
 
 (defun emojify-helm-buffer-p (buffer)
   "Determine if the current BUFFER is a helm buffer."