spacemacs/layers/+fun/emoji/packages.el
2016-05-29 22:39:21 -04:00

43 lines
1.5 KiB
EmacsLisp

;;; packages.el --- emoji Layer Packages File for Spacemacs
;;
;; Copyright (c) 2012-2016 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-packages
'(
emoji-cheat-sheet-plus
(company-emoji :toggle (configuration-layer/package-usedp 'company))
))
(defun emoji/init-emoji-cheat-sheet-plus ()
(use-package emoji-cheat-sheet-plus
:commands (emoji-cheat-sheet-plus-insert
emoji-cheat-sheet-plus-buffer
emoji-cheat-sheet-plus-display-mode)
:init
(progn
(spacemacs/set-leader-keys "aE" 'emoji-cheat-sheet-plus-buffer)
(spacemacs/set-leader-keys "ie" 'emoji-cheat-sheet-plus-insert)
(evilified-state-evilify emoji-cheat-sheet-plus-buffer-mode
emoji-cheat-sheet-plus-buffer-mode-map
"<RET>" 'emoji-cheat-sheet-plus-echo-and-copy)
(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)))))
(defun emoji/init-company-emoji ()
(use-package company-emoji
:defer t
:init (setq company-emoji-insert-unicode nil)))