emacs-orgmode
[Top][All Lists]
Advanced

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

Re: [Orgmode] Org-mode version 6.32trans (release_6.32b.22.gfbe1); Symbo


From: Stephan Schmitt
Subject: Re: [Orgmode] Org-mode version 6.32trans (release_6.32b.22.gfbe1); Symbol not found in org-src-switch-to-buffer
Date: Thu, 29 Oct 2009 16:49:09 +0100
User-agent: Thunderbird 2.0.0.23 (X11/20090817)

Hi,

I noticed the same problem. However, the function org-src-switch-to-buffer (with the breaking case-form) runs without problems when it is not compiled.

hth,
        Stephan

Gregory J. Grubbs wrote:
When running C-c ' (org-edit-special) on the file attached to
[[gnus:address@hidden from Eric
Schulte: Re: {babel} Re: org-babel: Met]]

I get the following backtrace

--8<---------------cut here---------------start------------->8---
Debugger entered--Lisp error: (invalid-function (quote current-window))
  (quote current-window)(#<buffer *Org Src noweb-eval.org[ latex ]*>)
  org-src-switch-to-buffer(#<buffer *Org Src noweb-eval.org[ latex ]*> edit)
  org-edit-src-code()
  ad-Orig-org-edit-special()
  org-edit-special()
  call-interactively(org-edit-special nil nil)
--8<---------------cut here---------------end--------------->8---

The symbol 'current-window is being evaluated as a function ... don't 
understand why.

I have org-src-window-setup set to 'reorganize-frame




Emacs  : GNU Emacs 23.1.50.1 (i686-pc-linux-gnu, GTK+ Version 2.18.2)
 of 2009-10-11 on maui
Package: Org-mode version 6.32trans (release_6.32b.22.gfbe1)

current state:
==============
(setq
 org-clock-in-switch-to-state "STARTED"
 org-todo-keyword-faces '(("TODO" :foreground "red" :weight bold) ("STARTED" :foreground 
"deep sky blue" :weight bold)
                          ("DONE" :foreground "forest green" :weight bold)
                          ("WAITING" :foreground "orange" :weight bold) ("SOMEDAY" 
:foreground "magenta" :weight bold)
                          ("CANCELLED" :foreground "forest green" :weight bold)
                          ("QUOTE" :foreground "red" :weight bold) ("QUOTED" :foreground 
"magenta" :weight bold)
                          ("APPROVED" :foreground "forest green" :weight bold)
                          ("EXPIRED" :foreground "forest green" :weight bold)
                          ("REJECTED" :foreground "forest green" :weight bold)
                          ("OPEN" :foreground "blue" :weight bold))
 org-special-ctrl-a/e t
 org-agenda-clockreport-parameter-plist '(:link t :maxlevel 99)
 org-agenda-custom-commands '(("P" "Projects" tags "Project" 
((org-use-tag-inheritance nil)))
                              ("S" "Started Tasks" todo "STARTED" 
((org-agenda-todo-ignore-with-date nil)))
                              ("w" "Tasks waiting on something" tags "WAITING" 
((org-use-tag-inheritance nil)))
                              ("r" "Refile New Notes and Tasks" tags "REFILE" 
((org-agenda-todo-ignore-with-date nil)))
                              ("n" "Notes" tags "NOTE" nil)
                              ("dc" "Clock report" agenda ""
                               ((org-agenda-ndays 1) 
(org-agenda-start-with-clockreport-mode t)
                                (org-agenda-time-grid nil)
                                (org-agenda-skip-function
                                 (quote
                                  (org-agenda-skip-entry-if (quote 
notscheduled) (quote deadline) (quote scheduled)))
                                 )
                                )
                               )
                              ("da" "GORT Agenda" ((agenda "") (todo 
"STARTED"))))
 org-agenda-files '("~/hebrew-word-list.org" "~/projects/next-work.org" 
"~/projects/notes.org"
                    "~/work/carolsetters/carolsetters.org" "~/projects/reid.org" 
"~/work/rockthehill/rockthehill.org"
                    "~/projects/misc.org" "~/work/cglawfirm/cglawfirm.org"
                    "~gregj/work/nodepression/nd-archive-conversion.org"
                    "~gregj/work/northsummitventures/northsummitventures.org")
 org-blocker-hook '(org-block-todo-from-children-or-siblings-or-parent)
 org-agenda-show-inherited-tags nil
 org-agenda-window-setup 'other-window
 org-agenda-exporter-settings '((ps-number-of-columns 1) (ps-landscape-mode t) 
(org-agenda-add-entry-text-maxlines 10)
                                (htmlize-output-type (quote css)))
 org-completion-use-ido t
 org-metaup-hook '(org-babel-load-in-session-maybe)
 org-after-todo-state-change-hook '(org-clock-out-if-current)
 org-read-date-prefer-future 'time
 org-clock-history-length 12
 org-babel-interpreters '("sh" "emacs-lisp")
 org-goto-interface 'outline-path-completion
 org-todo-state-tags-triggers '(("CANCELLED" ("CANCELLED" . t)) ("WAITING" ("WAITING" . 
t) ("NEXT"))
                                ("SOMEDAY" ("WAITING" . t)) (done ("NEXT") 
("WAITING"))
                                ("TODO" ("WAITING") ("CANCELLED")) ("STARTED" ("WAITING") 
("NEXT" . t)))
 org-agenda-restore-windows-after-quit t
 org-stuck-projects '("Project|project/-DONE" nil ("NEXT") "")
 org-export-preprocess-hook '(org-export-blocks-preprocess (lambda nil 
(org-dblock-update 2)))
 org-tags-exclude-from-inheritance '("Project" "project")
 org-tab-first-hook '(org-hide-block-toggle-maybe)
 org-src-mode-hook '(org-src-mode-configure-edit-buffer)
 org-confirm-shell-link-function 'yes-or-no-p
 org-clock-sound "~/projects/c136.wav"
 org-todo-keywords '((sequence "TODO(t)" "STARTED(s!)" "|" "DONE(d!/!)")
                     (sequence "PROPOSED(p)" "WAITING(w@/!)" "MAYBE(m!)" "OPEN(O@)" "|" 
"CANCELLED(c@/!)")
                     (sequence "QUOTE(q!)" "QUOTED(Q!)" "|" "APPROVED(A@)" "EXPIRED(E@)" 
"REJECTED(R@)"))
 org-agenda-before-write-hook nil
 org-default-notes-file "~/projects//inbox.org"
 org-directory "~/projects/"
 org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers 
org-cycle-show-empty-lines
                  org-optimize-window-after-visibility-change)
 org-refile-target-verify-function '(lambda nil (not (member "ARCHIVE" 
(org-get-tags))))
 org-mode-hook '((lambda nil (org-defkey org-mode-map [(control tab)] (quote 
org-next-link))
                  (org-defkey org-mode-map [C-S-iso-lefttab] (quote 
org-previous-link))
                  (org-defkey org-mode-map [home] (quote beginning-of-buffer))
                  (org-defkey org-mode-map [end] (quote end-of-buffer)))
                 #[nil "\300\301\302\303\304$\207"
                   [org-add-hook change-major-mode-hook org-show-block-all 
append local] 5]
                 )
 org-indirect-buffer-display 'current-window
 org-cycle-include-plain-lists 'integrate
 org-agenda-entry-text-maxlines 10
 org-agenda-ndays 1
 org-refile-targets '((org-agenda-files :maxlevel . 3))
 org-ctrl-c-ctrl-c-hook '(org-babel-lob-execute-maybe 
org-babel-execute-src-block-maybe)
 org-cycle-separator-lines 1
 org-return-follows-link t
 org-confirm-elisp-link-function 'yes-or-no-p
 org-refile-use-outline-path 'file
 org-log-into-drawer t
 org-agenda-mode-hook '((lambda nil (hl-line-mode 1) (org-defkey org-agenda-mode-map 
"o" (quote org-agenda-show))))
 org-export-interblocks '((lob org-babel-exp-lob-one-liners) (src 
org-babel-exp-inline-src-blocks))
 org-enforce-todo-dependencies t
 org-reverse-note-order t
 org-insert-heading-respect-content t
 org-occur-hook '(org-first-headline-recenter)
 org-yank-adjusted-subtrees t
 org-outline-path-complete-in-steps nil
 org-modules '(org-bbdb org-bibtex org-gnus org-info org-jsinfo org-irc org-mew 
org-mhe org-protocol org-rmail org-vm
               org-wl org-w3m)
 org-columns-default-format "%TODO %CATEGORY %60ITEM(Task)%5Effort(Estim){:} 
%5CLOCKSUM(Clock) %SCHEDULED(Time) %DEADLINE"
 org-remember-templates '(("todo" 119 "* TODO %c\n\n%i\n  %u" "~gregj/projects/notes.org" 
"Tasks")
                          ("bookmarks" 98 "* %c\n%i\n %u" "~gregj/projects/notes.org" 
"Bookmarks"))
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-export-blocks '((src org-babel-exp-src-blocks nil) (comment 
org-export-blocks-format-comment t)
                     (ditaa org-export-blocks-format-ditaa nil) (dot 
org-export-blocks-format-dot nil))
 )


_______________________________________________
Emacs-orgmode mailing list
Remember: use `Reply All' to send replies to the list.
address@hidden
http://lists.gnu.org/mailman/listinfo/emacs-orgmode




reply via email to

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