From: Alex Kost <alezost@gmail.com>
Subject: Re: [PATCH] gnu: Add emacs-mew.
Date: Wed, 01 Feb 2017 12:34:34 +0300

>> +     #:phases (modify-phases %standard-phases
>> +                (add-after 'configure 'patch-mew-icon-path ; 
>> ensure "Mew-icon.png" is found.
>> +                           (lambda _
>> +                             (substitute* "mew-key.el"
>> +                               (("\\(expand-file-name \"etc\" 
>> path\\)") "path")))))
>
> Hm, does it work for you?  I looked at "mew-key.el" but the code
> wasn't patched, probably something with the regexp.  Anyway it is
> better to patch 'mew-icon-directory' variable instead.

Hi,

Ouch, I messed up my patch when rebasing.  I meant to also set
--with-etcdir=elispdir (see attached version).  The substitution does
work, but has no use without the updated --with-etcdir.

> Also I see that by default it puts image files into
> "share/emacs/site-lisp/mew/etc".  I don't think this is a good
> place, I would rather move them to "share/mew" as most packages do
> with various additional files.

Yes, that would be cleaner.  Is there also a clean way to add
share/mew to emacs' image-load-path?  The problem is that the package
needs various *.xpm icon's, which are opened with “find-image” (via
“tool-bar-add-item”), which looks on image-load-path, whereas
“Mew-icon.png” is looked up in mew-icon-directory.

My patch as originally intended (now attached) puts everything in
share/emacs/site-lisp/guix.d/mew, where find-image will find it, and
patches mew-key.el so it also looks in that directory.  Not clean, but
it works :-)

cheers,

Thomas