Memnon Anon <gegendosenflei...@googlemail.com> writes:
> Hi,
>
> Eric Abrahamsen <e...@ericabrahamsen.net> writes:
>
>> I've noticed for a while that two org files in my ~/org directory never
>> get added to org-agenda-files, and I can't figure out why. My
>> org-agenda-files is set to '("~/org/"), and yet:
>>
>> (dolist (f (directory-files "~/org" t "org$"))
>> (unless (member f org-agenda-files)
>> (insert (format "%s: %s\n" f (file-attributes f)))))
>>
>> /home/eric/org/epubnotes.org: (nil 1 1000 100 (20752 42274) (20740 56906)
>> (20740 56906) 10673 -rw-r--r-- nil 8655230 2052)
>> /home/eric/org/running.org: (nil 1 1000 100 (20768 26205) (20768 21290)
>> (20768 24128) 423435 -rw-r--r-- nil 5375520 2052)
>
> Did you try edebuging defun org-agenda-files in org.el?
>
> Seems like the relevant bit that extracts all org files from the
> directory is:
>
> (apply 'append (mapcar (lambda (f)
> (if (file-directory-p f)
> (directory-files
> f t org-agenda-file-regexp)
> (list f)))
> org-agenda-files))
Oh, I had read this wrong -- for some reason I thought it was just
looping over the already-populated variable.
But the real problem was that org-agenda-files somehow got written as a
customize variable, I have no idea when or how, and so was locked in
state. Total user error. Sorry about that...
