[Orgmode] Re: org-directory changed?

[Richard Riley]

Nick Dokos <address@hidden> writes:

> Richard Riley <address@hidden> wrote:
>
>> 
>> Has something dramatic changed with how org loads files?
>> 
>> My org-directory setting is ~/org-files.
>> 
>> When I start up my agenda this morning after a git pull I get
>> 
>> insert-file-contents-literally: not a regular file:
>> /home/shamrock/org-files
>> 
>> 
>
> I just pulled and saw no problem (but I'm not using org-directory for my
> agenda files: they are explicitly enumerated in org-agenda-files). I
> think the most useful way forward would be for you to get a backtrace.
>
> Thanks,
> Nick
>

OK, here's the bt. So something to do with category items which rang a
bell. In my custom I had a default 

 '(org-agenda-category-icon-alist (quote (("" "" nil nil nil))))

This caused the issue. I removed it and all was well. Possibly some
bolstering of the category icon code might protect against this - not
sure if it would be a common occurrence or not.


,----
| Debugger entered--Lisp error: (file-error "not a regular file" 
"/home/shamrock/org-files")
|   insert-file-contents("" nil 0 256 nil)
|   insert-file-contents-literally("" nil 0 256)
|   image-type-from-file-header("")
|   image-type("" nil nil)
|   create-image("" nil nil nil)
|   apply(create-image ("" nil nil nil))
|   byte-code("\305\211\203:address@hidden     @\"\2033       
\211A@)<\203*\307\310   \211A@)\"\210\2023\307\310\311\312      
A\"\"\210\nA\211\204*\305\207" [org-agenda-category-icon-alist entry 
--cl-dolist-temp-- category x nil org-string-match-p throw --cl-block-nil-- 
apply create-image] 6)
|   org-agenda-get-category-icon(#("Hamburg, Germany" 0 16 (fontified nil 
org-category #("Journal" 0 7 ...))))
|   org-format-agenda-item("Sched. 2x: " "recurring org items          
:orgmode:recurring:schedule:CANCELLED:" #("Hamburg, Germany" 0 16 (fontified 
nil org-category #("Journal" 0 7 ...))) (#("journal" 0 7 (inherited t)) 
"orgmode" "recurring" "schedule" "CANCELLED") nil nil nil nil)
|   byte-code("\306 
\210\307\310!\311\310\224S\312\307\310!\313\f$\211Z9:\205$9\314W;9\314W\203A\3159!<W\203A:\203A=\203H9\314U\203\246\212\316
 \2118>\235?\317\320!\205[\320 @address@hidden"\321 
B\322\323\311\324#\204\212C\202\"address@hidden:\204\320F\203\320\325\326\311\"\210\202\320G\324=\204\277G\203\320;\203\320\327DH\"\211I\203\320\325\326\311\"\210\330
 
J\331`\332\311w\210`\"K\333\334\"address@hidden@\3109Z\"KBJ9\314U\205
L\311\211@&
        address@hidden;\2034\341\202>:\203=\342\202>\343'@\205G\344 @\345      
N\346'\347?\203Z\350\202\\'\351\352\n!\353\352D!\354;\203o\355\202p\356\357;\203z
\202|/address@hidden@!\202\223\362\363\3649Z\365       address@hidden&\210     
OBO)\311\207" [s txt pos d1 org-agenda-repeating-timestamp-show-all d2 
org-agenda-skip match-string 1 nil org-time-string-to-absolute past 0 abs 
org-get-todo-state functionp org-is-habit-p org-get-category re-search-backward 
"^\\*+[        ]+" t throw :skip assoc org-get-tags-at 
buffer-substring-no-properties "^\n" string-match " 
\\([012]?[0-9]:[0-9][0-9]\\)" " " time org-format-agenda-item format 
org-scheduled-previously org-scheduled-today org-scheduled org-habit-parse-todo 
org-add-props undone-face face org-agenda-done org-marker org-agenda-new-marker 
org-hd-marker type "past-scheduled" "scheduled" date priority 
org-habit-get-priority ...] 24)
|   org-agenda-get-scheduled(nil)
|   org-agenda-get-day-entries("/home/shamrock/org-files/journal.org" (11 17 
2010) :deadline :scheduled :timestamp :sexp)
|   apply(org-agenda-get-day-entries "/home/shamrock/org-files/journal.org" (11 
17 2010) (:deadline :scheduled :timestamp :sexp))
|   byte-code("\306!\210       \n\204\307\310 
\"\311=\203\312\f\313#\2026\203/\314\312\f\315\316 \"$\2026\314\312\f     
$)\315\"\306\207" [file org-agenda-entry-types org-agenda-include-deadlines 
org-agenda-show-log date rtn org-check-agenda-file delq :deadline only 
org-agenda-get-day-entries :closed apply append (:closed) rtnall] 7)
|   org-agenda-list(nil)
|   call-interactively(org-agenda-list)
|   (let nil (call-interactively (quote org-agenda-list)))
|   (let nil (let nil (call-interactively ...)))
|   eval((let nil (let nil (call-interactively ...))))
|   org-let2(nil nil (call-interactively (quote org-agenda-list)))
|   org-run-agenda-series("My\n Today" (((agenda "" nil) (tags "sticky" ...)) 
nil nil))
|   byte-code("\306\307         
\232\203\310\202\n\311\306\312\313\"\"p\314\315 
address@hidden@address@hidden \306\223\210J\331 
\306\223\210\202\277M\332=\203\277\212\327H\333\327!\210I`\306\223\210J\334\327!\306\223\210)\335L\"\211A\203\314\336A89\204\333\337\336A8!\203\273\336A8C\340\341A8!D\342A8E\320\323\324E#\210C\343=\203
\344E\345\"\202$C\346=\203
\344E\347\"\202$C\350=\203#\344E\351\"\202$C\352=\2032\344E\353\"\202$C\354=\203A\344E\355\"\202$C\356=\203P\344E\357\"\202$C\360=\203_\344E\361\"\202$C\362=\203q\363
 \210\344E\364\"\202$C\365=\203\203\363 
\210\344E\366\"\202$C\367=\203\225\363 
\210\344E\370\"\202$\337C!\203\244\344E\371\"\202$\372C!\203\263\344E\373\"\202$\374\375C\"address@hidden)\"\202$L\377\232\203\335\f\201S\303!\202$L\201T\232\203\360\201U\201V!\202$L\201W\232\203\201U\201X!\202$L\201Y\232\203\201U\201Z!\202$L\201[\232\203<\201ZO\206*\201\\OPOQ\201UP!+\202$L\201]\232\203O\201U\201^!\202$L\201_\232\203u\201^O\206c\201`OPOQ\201UP!+\202$L\201a\232\203\210\201U\201b!\202$L\201c\232\203\251\201^\306\201d\"address@hidden"
 [prefix-descriptions org-agenda-buffer-name org-agenda-window-setup 
org-agenda-custom-commands org-agenda-custom-commands-orig buf nil buffer-name 
current-window delq mapcar #[(x) "A;\203\f  
B\302\207A@;address@hidden'address@hidden)address@hidden" [x 
prefix-descriptions nil ""] 4] buffer-file-name buffer-base-buffer boundp 
org-agenda-keep-restricted-file-list put org-agenda-files org-restrict 
org-agenda-redo-command org-lprops org-agenda-get-restriction-and-command 
region t region-beginning region-end subtree org-back-to-heading 
org-end-of-subtree assoc 2 functionp eval 3 4 agenda org-let (org-agenda-list 
current-prefix-arg) alltodo (org-todo-list current-prefix-arg) search 
(org-search-view current-prefix-arg match nil) stuck 
(org-agenda-list-stuck-projects current-prefix-arg) tags (org-tags-view 
current-prefix-arg match) tags-todo (org-tags-view (quote ...) match) todo 
(org-todo-list match) ...] 6)
|   org-agenda(nil)
|   call-interactively(org-agenda nil nil)
`----