summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/icons.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/emacs-lisp/icons.el')
-rw-r--r--lisp/emacs-lisp/icons.el6
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/icons.el b/lisp/emacs-lisp/icons.el
index 93749a3451e..a08ac7463ce 100644
--- a/lisp/emacs-lisp/icons.el
+++ b/lisp/emacs-lisp/icons.el
@@ -202,7 +202,11 @@ present if the icon is represented by an image."
:height (if (eq height 'line)
(window-default-line-height)
height)
- :scale 1)
+ :scale 1
+ :rotation (or (plist-get keywords :rotation) 0)
+ :ascent (if (plist-member keywords :ascent)
+ (plist-get keywords :ascent)
+ 'center))
(create-image file))))))
(cl-defmethod icons--create ((_type (eql 'emoji)) icon _keywords)