[gnugo-devel] Re: XPM's

[Thien-Thi Nguyen]

and here is a way to preview the images in emacs:

  (require 'cl)
  (load-file "gnugo-glyphs.el")
  (dolist (xpm-var (mapcar 'car (apropos "^gnugo-xpm-")))
    (let ((xpm (eval xpm-var)))
      (insert-image (find-image `((:type xpm :data ,xpm))))
      (insert (format "%s\n" xpm-var))))

you can try this in *scratch*, for example.  (probably `apropos' is not
right function to use in this case, but hey irony is a dying art...)

thi