FG42
/
FG42
1
0
Fork 1
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity

Add cursor-type cube

This commit is contained in:
Sameer Rahmani 2021-05-03 17:02:13 +01:00
parent 8b0f3e6539
commit c813cec12f
1 changed files with 9 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
core/cubes/editor.el
View File

@ -28,6 +28,15 @@
"Enable the support for font icones in FG42.")
(defcube fg42/cursor-cube
(:docs "cubes/fg42/cursor-cube.org"
:flag cursor-type)
(let ((ctype (or (plist-get fg42/cursor-cube-params :type) 'box))
(ccolor (or (plist-get fg42/cursor-cube-params :color) "#aa0000")))
(set-default 'cursor-type ctype)
(set-cursor-color ccolor)))
(defcube fg42/buffer-navigation-cube
(:docs "cubes/fg42/buffer-navigation-cube.org"
:flag buffer-navigation)