Re: Extending the concept of pretty-greek with icons/images

[Johan Bockgård]

Nordlöw <per.nordlow@gmail.com> writes:

> Wanting to try out my idea I thought I could start simple by
> overlay/change all the gtk_ prefix with a miniturized version of the
> GTK's main icon seen www.gtk.org
> (http://www.gtk.org/images/gtk-logo-rgb.gif). Is this possible to do
> easily in Emacs or do I have to change the internals (C code) of
> Emacs?

Something like

    (defun pretty-icons ()
      (add-to-list 'char-property-alias-alist '(display pretty))
      (add-to-list 'font-lock-extra-managed-props 'pretty)

      (font-lock-add-keywords
       nil
       `(("\\_<\\(foo\\)-"
          (1 '(face nil pretty ,(create-image "lock.xpm")))))))


http://i23.tinypic.com/2l93yuu.png

-- 
Johan Bockgård