Use a nicer, cleaner syntax calling #'make-glyph

[emchat] / emchat-xwem.el

diff --git a/emchat-xwem.el b/emchat-xwem.el
index f433e48..d64327a 100644 (file)
--- a/emchat-xwem.el
+++ b/emchat-xwem.el
@@ -361,7 +361,7 @@ Each element is cons in form (GROUP . COLOR)."
     (xwem-osd-text-add
      emchat-xwem-osd
      (if emchat-xwem-osd-show-icon
-        (glyph-width (make-glyph (vector 'xpm :data emchat-xwem-osd-icon)))
+        (glyph-width (make-glyph `[xpm :data ,emchat-xwem-osd-icon]))
        0) 0
      (encode-coding-string
       (format "%s: %s" nick message)