From mboxrd@z Thu Jan 1 00:00:00 1970 From: Stephan Schmitt Subject: Re: Re: Org-mode version 6.32trans (release_6.32b.22.gfbe1); Symbol not found in org-src-switch-to-buffer Date: Thu, 29 Oct 2009 18:53:59 +0100 Message-ID: <4AE9D6B7.3080902@cs.tu-berlin.de> References: <874opite1h.fsf@dynapse.com> <4AE9B975.9030404@cs.tu-berlin.de> <515D5CCC-5E21-4E90-8F10-7CB7D59EBAEA@gmail.com> <874opiks12.fsf@dynapse.com> Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1; format=flowed Content-Transfer-Encoding: 7bit Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1N3ZK8-00085V-14 for emacs-orgmode@gnu.org; Thu, 29 Oct 2009 14:02:12 -0400 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1N3ZK3-000824-34 for emacs-orgmode@gnu.org; Thu, 29 Oct 2009 14:02:11 -0400 Received: from [199.232.76.173] (port=59843 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1N3ZK3-000821-12 for emacs-orgmode@gnu.org; Thu, 29 Oct 2009 14:02:07 -0400 Received: from mail.cs.tu-berlin.de ([130.149.17.13]:60092) by monty-python.gnu.org with esmtps (TLS-1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1N3ZK2-0001G9-6J for emacs-orgmode@gnu.org; Thu, 29 Oct 2009 14:02:06 -0400 Received: from localhost (localhost [127.0.0.1]) by localhost-12225.cs.tu-berlin.de (Postfix) with ESMTP id 1088234033 for ; Thu, 29 Oct 2009 19:02:05 +0100 (MET) In-Reply-To: <874opiks12.fsf@dynapse.com> List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: "Gregory J. Grubbs" Cc: emacs-orgmode@gnu.org (eval-when-compile (require 'cl)) did the trick thx, too! Stephan Gregory J. Grubbs wrote: > I don't understand how ... but that solves it for me - thanks! > > -Greg > > Carsten Dominik writes: > >> Can you guys please try to pull again? I think this problem is solved >> now - let me know if not. >> >> - Carsten >> >> On Oct 29, 2009, at 4:49 PM, Stephan Schmitt wrote: >> >>> 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:gmane.emacs.orgmode#m2ws2fuppl.fsf@gmail.com][Email 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)(#) >>>> org-src-switch-to-buffer(#>>> 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. >>>> Emacs-orgmode@gnu.org >>>> http://lists.gnu.org/mailman/listinfo/emacs-orgmode >>> >>> _______________________________________________ >>> Emacs-orgmode mailing list >>> Remember: use `Reply All' to send replies to the list. >>> Emacs-orgmode@gnu.org >>> http://lists.gnu.org/mailman/listinfo/emacs-orgmode >> - Carsten >> >> >> >> >> >> _______________________________________________ >> Emacs-orgmode mailing list >> Remember: use `Reply All' to send replies to the list. >> Emacs-orgmode@gnu.org >> http://lists.gnu.org/mailman/listinfo/emacs-orgmode > > > > _______________________________________________ > Emacs-orgmode mailing list > Remember: use `Reply All' to send replies to the list. > Emacs-orgmode@gnu.org > http://lists.gnu.org/mailman/listinfo/emacs-orgmode