spacemacs/contrib/!fun/emoji/extensions.el

36 lines
1.5 KiB
EmacsLisp
Raw Normal View History

2015-05-24 23:11:34 +00:00
;;; extensions.el --- emoji Layer Extensions File for Spacemacs
;;
;; Copyright (c) 2012-2014 Sylvain Benner
;; Copyright (c) 2014-2015 Sylvain Benner & Contributors
;;
;; Author: Sylvain Benner <sylvain.benner@gmail.com>
;; URL: https://github.com/syl20bnr/spacemacs
;;
;; This file is not part of GNU Emacs.
;;
;;; License: GPLv3
(setq emoji-post-extensions '(emacs-emoji-cheat-sheet-plus))
(defun emoji/init-emacs-emoji-cheat-sheet-plus ()
(use-package emoji-cheat-sheet-plus
2015-05-25 04:44:18 +00:00
:commands (emoji-cheat-sheet-plus-insert
emoji-cheat-sheet-plus-buffer-mode
2015-05-24 23:11:34 +00:00
emoji-cheat-sheet-plus-display-mode)
:init
(progn
(evil-leader/set-key "aE" 'emoji-cheat-sheet-plus-buffer)
(evil-leader/set-key "ie" 'emoji-cheat-sheet-plus-insert)
(evilify emoji-cheat-sheet-plus-buffer-mode
emoji-cheat-sheet-plus-buffer-mode-map
"<RET>" 'emoji-cheat-sheet-plus-echo-and-copy)
2015-05-25 03:38:56 +00:00
(defun spacemacs//delay-emoji-cheat-sheet-hook ()
"Work-around for org buffers."
;; we need to wait for org buffer to be fully loaded before
;; calling the emoji mode.
;; If we directly call the emoji mode at hook runtime then some
;; text properties are not applied correctly.
(run-at-time 0.1 nil 'emoji-cheat-sheet-plus-display-mode))
2015-05-25 04:44:18 +00:00
(add-hook 'org-mode-hook 'spacemacs//delay-emoji-cheat-sheet-hook)
2015-05-25 03:38:56 +00:00
(add-to-hooks 'emoji-cheat-sheet-plus-display-mode '(markdown-mode)))))