emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[O] Bug: wrong type error on load-file in org-babel-load-file when there


From: Enzo Chi
Subject: [O] Bug: wrong type error on load-file in org-babel-load-file when there's nothing to be tangled [8.3beta (release_8.3beta-580-g787733.dirty @ /usr/local/share/emacs/24.4/lisp/org/)]
Date: Wed, 19 Nov 2014 09:31:54 +1100

--text follows this line--


Remember to cover the basics, that is, what you expected to happen and
what in fact did happen.  You don't know how to make a good report?  See

     http://orgmode.org/manual/Feedback.html#Feedback

Your bug report will be posted to the Org-mode mailing list.
------------------------------------------------------------------------

(org-babel-load-file) When there's nothing to be tangle, 'exported-file'
will be set to nil. That would cause type error for load-file function.

I have created a patch for it. By adding extra check on exported-file
before compile/load it. But I don't know where should I send it.


Emacs  : GNU Emacs 24.4.1 (x86_64-unknown-linux-gnu, GTK+ Version 3.10.8)
 of 2014-10-23 on ubuntuBMDSyn
Package: Org-mode version 8.3beta (release_8.3beta-580-g787733.dirty @ /usr/local/share/emacs/24.4/lisp/org/)

current state:
==============
(setq
 org-src-lang-modes '(("dot" . graphviz-dot) ("ocaml" . tuareg) ("elisp" . emacs-lisp) ("ditaa" . artist)
                      ("asymptote" . asy) ("dot" . fundamental) ("sqlite" . sql) ("calc" . fundamental) ("C" . c)
                      ("cpp" . c++) ("C++" . c++) ("screen" . shell-script) ("shell" . sh) ("bash" . sh))
 org-export-backends '(ascii beamer html icalendar latex odt org)
 org-agenda-tags-todo-honor-ignore-options t
 org-tab-first-hook '(org-hide-block-toggle-maybe org-babel-hide-result-toggle-maybe org-babel-header-arg-expand)
 org-speed-command-hook '(org-speed-command-default-hook org-babel-speed-command-hook)
 org-clock-history-length 23
 org-occur-hook '(org-first-headline-recenter)
 org-src-tab-acts-natively t
 org-metaup-hook '(org-babel-load-in-session-maybe)
 org-html-format-drawer-function '(lambda (name contents) contents)
 org-clock-into-drawer t
 org-latex-format-inlinetask-function 'org-latex-format-inlinetask-default-function
 org-confirm-shell-link-function 'yes-or-no-p
 org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
 org-highlight-latex-and-related '(latex script entities)
 org-agenda-custom-commands '(("N" "Notes" tags "NOTE"
                               ((org-agenda-overriding-header "Notes") (org-tags-match-list-sublevels t)))
                              ("h" "Habits" tags-todo "STYLE=\"habit\""
                               ((org-agenda-overriding-header "Habits")
                                (org-agenda-sorting-strategy (quote (todo-state-down effort-up category-keep))))
                               )
                              (" " "Agenda"
                               ((agenda "" nil)
                                (tags "REFILE"
                                 ((org-agenda-overriding-header "Tasks to Refile")
                                  (org-tags-match-list-sublevels nil))
                                 )
                                (tags-todo "-CANCELLED/!"
                                 ((org-agenda-overriding-header "Stuck Projects")
                                  (org-agenda-skip-function (quote bh/skip-non-stuck-projects))
                                  (org-agenda-sorting-strategy (quote (category-keep))))
                                 )
                                (tags-todo "-HOLD-CANCELLED/!"
                                 ((org-agenda-overriding-header "Projects")
                                  (org-agenda-skip-function (quote bh/skip-non-projects))
                                  (org-tags-match-list-sublevels (quote indented))
                                  (org-agenda-sorting-strategy (quote (category-keep))))
                                 )
                                (tags-todo "-CANCELLED/!NEXT"
                                 ((org-agenda-overriding-header
                                   (concat "Project Next Tasks"
                                    (if bh/hide-scheduled-and-waiting-next-tasks ""
                                     " (including WAITING and SCHEDULED tasks)")
                                    )
                                   )
                                  (org-agenda-skip-function (quote bh/skip-projects-and-habits-and-single-tasks))
                                  (org-tags-match-list-sublevels t)
                                  (org-agenda-todo-ignore-scheduled bh/hide-scheduled-and-waiting-next-tasks)
                                  (org-agenda-todo-ignore-deadlines bh/hide-scheduled-and-waiting-next-tasks)
                                  (org-agenda-todo-ignore-with-date bh/hide-scheduled-and-waiting-next-tasks)
                                  (org-agenda-sorting-strategy (quote (todo-state-down effort-up category-keep))))
                                 )
                                (tags-todo "-REFILE-CANCELLED-WAITING-HOLD/!"
                                 ((org-agenda-overriding-header
                                   (concat "Project Subtasks"
                                    (if bh/hide-scheduled-and-waiting-next-tasks ""
                                     " (including WAITING and SCHEDULED tasks)")
                                    )
                                   )
                                  (org-agenda-skip-function (quote bh/skip-non-project-tasks))
                                  (org-agenda-todo-ignore-scheduled bh/hide-scheduled-and-waiting-next-tasks)
                                  (org-agenda-todo-ignore-deadlines bh/hide-scheduled-and-waiting-next-tasks)
                                  (org-agenda-todo-ignore-with-date bh/hide-scheduled-and-waiting-next-tasks)
                                  (org-agenda-sorting-strategy (quote (category-keep))))
                                 )
                                (tags-todo "-REFILE-CANCELLED-WAITING-HOLD/!"
                                 ((org-agenda-overriding-header
                                   (concat "Standalone Tasks"
                                    (if bh/hide-scheduled-and-waiting-next-tasks ""
                                     " (including WAITING and SCHEDULED tasks)")
                                    )
                                   )
                                  (org-agenda-skip-function (quote bh/skip-project-tasks))
                                  (org-agenda-todo-ignore-scheduled bh/hide-scheduled-and-waiting-next-tasks)
                                  (org-agenda-todo-ignore-deadlines bh/hide-scheduled-and-waiting-next-tasks)
                                  (org-agenda-todo-ignore-with-date bh/hide-scheduled-and-waiting-next-tasks)
                                  (org-agenda-sorting-strategy (quote (category-keep))))
                                 )
                                (tags-todo "-CANCELLED+WAITING|HOLD/!"
                                 ((org-agenda-overriding-header
                                   (concat "Waiting and Postponed Tasks"
                                    (if bh/hide-scheduled-and-waiting-next-tasks ""
                                     " (including WAITING and SCHEDULED tasks)")
                                    )
                                   )
                                  (org-agenda-skip-function (quote bh/skip-non-tasks))
                                  (org-tags-match-list-sublevels nil)
                                  (org-agenda-todo-ignore-scheduled bh/hide-scheduled-and-waiting-next-tasks)
                                  (org-agenda-todo-ignore-deadlines bh/hide-scheduled-and-waiting-next-tasks))
                                 )
                                (tags "-REFILE/"
                                 ((org-agenda-overriding-header "Tasks to Archive")
                                  (org-agenda-skip-function (quote bh/skip-non-archivable-tasks))
                                  (org-tags-match-list-sublevels nil))
                                 )
                                )
                               nil)
                              )
 org-use-sub-superscripts '{}
 org-latex-format-headline-function 'org-latex-format-headline-default-function
 org-clock-in-resume t
 org-after-todo-state-change-hook '(org-clock-out-if-current)
 org-latex-format-drawer-function '(lambda (name contents) contents)
 org-src-mode-hook '(org-src-babel-configure-edit-buffer org-src-mode-configure-edit-buffer)
 org-agenda-before-write-hook '(org-agenda-add-entry-text)
 org-babel-pre-tangle-hook '(save-buffer)
 org-agenda-dim-blocked-tasks nil
 org-mode-hook '(org-clock-load
                 (lambda nil (local-set-key "\216" (quote outline-next-visible-heading))
                  (local-set-key "\220" (quote outline-previous-visible-heading))
                  (local-set-key "\225" (quote outline-up-heading))
                  (local-set-key "\227" (quote org-table-copy-region))
                  (local-set-key "\231" (quote org-table-paste-rectangle))
                  (local-set-key "\214" (quote org-table-sort-lines))
                  (local-set-key "\311" (quote org-toggle-iimage-in-org))
                  (local-set-key (kbd "C-c s i") (quote my:org-insert-src-block))
                  (local-set-key "l" (quote org-store-link)) (flyspell-mode 1) (local-unset-key (kbd "C-c ;")))
                 #[nil "\300\301\302\303\304$\207"
                   [org-add-hook change-major-mode-hook org-show-block-all append local] 5]
                 #[nil "\300\301\302\303\304$\207"
                   [org-add-hook change-major-mode-hook org-babel-show-result-all append local] 5]
                 org-babel-result-hide-spec org-babel-hide-all-hashes org-eldoc-load)
 org-refile-targets '((nil :maxlevel . 9) (org-agenda-files :maxlevel . 9))
 org-fontify-done-headline t
 org-archive-hook '(org-attach-archive-delete-maybe)
 org-use-speed-commands t
 org-agenda-compact-blocks t
 org-ascii-format-drawer-function '(lambda (name contents width) contents)
 org-clock-persist t
 org-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point org-babel-execute-safely-maybe)
 org-clock-in-switch-to-state 'my:clock-in-to-start
 org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers org-cycle-hide-inline-tasks
                  org-cycle-show-empty-lines org-optimize-window-after-visibility-change)
 org-load-hook '(org-insert-dblock-bindings)
 org-plantuml-jar-path "~/App/plantuml.jar"
 org-lowest-priority 69
 org-clock-persist-query-resume nil
 org-ditaa-eps-jar-path "/usr/local/share/emacs/24.4/lisp/contrib/scripts/DitaaEps.jar"
 org-hide-emphasis-markers t
 org-fast-tag-selection-single-key 'expert
 org-clock-report-include-clocking-task t
 org-babel-tangle-lang-exts '(("tcl" . "tcl") ("python" . "py") ("latex" . "tex") ("awk" . "awk") ("D" . "d")
                              ("C++" . "cpp") ("emacs-lisp" . "el") ("elisp" . "el"))
 org-confirm-elisp-link-function 'yes-or-no-p
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-default-priority 69
 org-ditaa-jar-path "/usr/share/ditaa/ditaa.jar"
 org-html-format-headline-function 'org-html-format-headline-default-function
 org-babel-load-languages '((C . t) (R . t) (awk . t) (calc . t) (ditaa . t) (dot . t) (emacs-lisp . t)
                            (latex . t) (makefile . t) (org . t) (plantuml . t) (python . t) (shell . t) (sql . t)
                            (sqlite . t) (tcl . t))
 org-html-format-inlinetask-function 'org-html-format-inlinetask-default-function
 org-clock-out-hook '(org-clock-remove-empty-clock-drawer my:remove-empty-drawer-on-clock-out my:clock-out-maybe)
 org-confirm-babel-evaluate nil
 org-clock-out-remove-zero-time-clocks t
 )


reply via email to

[Prev in Thread] Current Thread [Next in Thread]