commit d4c3d2fa448d52be1f898dffa30660c4bc1cdb4c
parent e31d49e96a7a412baaefe4684d0a097f5d2363db
Author: Iqbal Ansari <iqbal.ansari@ignitesol.com>
Date: Thu, 29 Oct 2015 15:00:03 +0530
Do not try to emojify org-mode lists
Diffstat:
1 file changed, 6 insertions(+), 2 deletions(-)
diff --git a/emojify.el b/emojify.el
@@ -104,8 +104,8 @@ Possible values are
`both' - Display emojis in comments and strings
`none' - Do not display emojis in programming modes")
-(defcustom emojify-inhibit-hooks
- '(emojify-inhibit-in-org-tags)
+(defcustom emojify-inhibit-functions
+ '(emojify-inhibit-in-org-tags emojify-inhibit-in-org-list)
"Functions used to if emoji should displayed at current point.
These functions are called with 3 arguments, the text to be emojified, the start
@@ -119,6 +119,10 @@ buffer where emojis are going to be displayed selected."
(string-match-p ":.*:" match)
(eq (line-end-position) end)))
+(defun emojify-inhibit-in-org-list (match beg end)
+ (and (eq major-mode 'org-mode)
+ (org-at-item-p)))
+
(defun emojify-valid-prog-context-p (beg end)
(unless (or (not emojify-prog-contexts)
(eq emojify-prog-contexts 'none))