diff --git a/etc/images/outline-close.svg b/etc/images/outline-close.svg new file mode 100644 index 0000000000..ea9157a5fb --- /dev/null +++ b/etc/images/outline-close.svg @@ -0,0 +1,6 @@ + +outline-close + + + + diff --git a/etc/images/outline-open.svg b/etc/images/outline-open.svg new file mode 100644 index 0000000000..75cf6aff9f --- /dev/null +++ b/etc/images/outline-open.svg @@ -0,0 +1,4 @@ + +outline-open + + diff --git a/lisp/emacs-lisp/icons.el b/lisp/emacs-lisp/icons.el index 93749a3451..ff4f20c207 100644 --- a/lisp/emacs-lisp/icons.el +++ b/lisp/emacs-lisp/icons.el @@ -202,7 +202,7 @@ icons--create :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) diff --git a/lisp/outline.el b/lisp/outline.el index b19e0cf811..364c3bee84 100644 --- a/lisp/outline.el +++ b/lisp/outline.el @@ -292,16 +295,18 @@ outline-minor-mode-use-buttons :safe #'booleanp :version "29.1") -(define-icon outline-open button - '((emoji "🔽") +(define-icon outline-open nil + '((image "outline-open.svg" :height 15 :ascent center) + (emoji "🔽") (symbol " ▼ ") (text " open ")) "Icon used for buttons for opening a section in outline buffers." :version "29.1" :help-echo "Open this section") -(define-icon outline-close button - '((emoji "▶️") +(define-icon outline-close nil + '((image "outline-close.svg" :height 15 :ascent center) + (emoji "▶️") (symbol " ▶ ") (text " close ")) "Icon used for buttons for closing a section in outline buffers."