procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Add outline open/close images (bug#57813)

Browse source 
* etc/images/outline-open.svg:
* etc/images/outline-close.svg: New files.

* lisp/outline.el (outline-open, outline-close): Use images
outline-open.svg and outline-close.svg.

* lisp/emacs-lisp/icons.el (icons--create): Add :ascent 'center'.
This commit is contained in:
Juri Linkov 2022-09-16 10:09:20 +03:00
parent e3b79c641e
commit 8b29b29693
4 changed files with 17 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/emacs-lisp/icons.el
View file

@ -202,7 +202,7 @@ present if the icon is represented by an image."
:height (if (eq height 'line)
(window-default-line-height)
height)
:scale 1)
:scale 1 :ascent 'center)
(create-image file))))))
(cl-defmethod icons--create ((_type (eql 'emoji)) icon _keywords)