37f4a5250e
Font support for company-emoji on Linux or on Mac OS X and using the Cocoa version of Emacs. See https://github.com/dunn/company-emoji/blob/master/README.md
49 lines
1.7 KiB
EmacsLisp
49 lines
1.7 KiB
EmacsLisp
;;; packages.el --- emoji Layer Packages File for Spacemacs
|
|
;;
|
|
;; Copyright (c) 2012-2017 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
|
|
(progn
|
|
(setq company-emoji-insert-unicode nil)
|
|
;; For when Emacs is started in GUI mode:
|
|
(spacemacs//set-emoji-font nil)
|
|
;; Hook for when a frame is created with emacsclient
|
|
(spacemacs|do-after-display-system-init
|
|
(spacemacs//set-emoji-font-for-current-frame)))))
|