Re: Error with org-agenda-write

[Ian Barton <lists@wilkesley.net>]

On 29/04/14 19:06, Bastien wrote:

> Ian Barton <lists@wilkesley.net> writes:
>
>> The only version of the file I have on my disk is in
>> /home/ian/.emacs.d/src/org-mode/contrib/lisp/htmlize.el
>
> Looks like a problem with one of your (customized?) face.
> Can you reproduce it with emacs -Q ?
>
Well I had narrowed it down to this part of my init file:

#+BEGIN_SRC emacs-lisp
   (defun my-adjoin-to-list-or-symbol (element list-or-symbol)
     (let ((list (if (not (listp list-or-symbol))
                     (list list-or-symbol)
                   list-or-symbol)))
       (require 'cl-lib)
       (cl-adjoin element list)))
(mapc
    (lambda (face)
      (set-face-attribute
       face nil
       :inherit
       (my-adjoin-to-list-or-symbol
        'fixed-pitch
        (face-attribute face :inherit))))
    (list 'org-code 'org-block 'org-table 'org-block-background 
'org-date 'org-link 'org-footnote))
#+END_SRC

After removing this the error went away. However, just to confirm this 
was the problem I put that section back in my init file, to see if the 
error re-occurred, and now it all works perfectly with no errors.

I blame the goblins in my computer:) Sorry for the noise.

Ian.