From mboxrd@z Thu Jan 1 00:00:00 1970 From: Nick Dokos Subject: Re: Bug: org-capture Does not take user to any new buffer Date: Tue, 05 Jun 2012 13:01:32 -0400 Message-ID: <3893.1338915692@alphaville> References: <1414.1338868583@alphaville> <3175.1338910540@alphaville> <3362.1338911751@alphaville> Reply-To: nicholas.dokos@hp.com Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Return-path: Received: from eggs.gnu.org ([208.118.235.92]:37549) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Sbx8Z-0006R1-3Q for emacs-orgmode@gnu.org; Tue, 05 Jun 2012 13:01:44 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Sbx8R-0004eS-6s for emacs-orgmode@gnu.org; Tue, 05 Jun 2012 13:01:42 -0400 Received: from g4t0015.houston.hp.com ([15.201.24.18]:30700) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Sbx8R-0004dx-04 for emacs-orgmode@gnu.org; Tue, 05 Jun 2012 13:01:35 -0400 In-Reply-To: Message from Mike Fitzgerald of "Tue\, 05 Jun 2012 11\:06\:32 CDT." List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: Mike Fitzgerald Cc: emacs-orgmode@gnu.org Mike Fitzgerald wrote: > Debugger entered--Lisp error: (invalid-function org-called-interactively-= p) > org-called-interactively-p(interactive) > org-paste-subtree(4 #("* %?\nEntered on [2012-06-05 Tue 11:04]\n" 0 5 (= fontified nil) 5 16 (fontified nil) 16 17 (fontified nil) 17 37 (fontified = nil) 37 38 (fontified nil) 38 39 (fontified nil)) for-yank) > (let* ((txt ...) (reversed ...) (target-entry-p ...) level beg end file= ) (cond (... ...) (... ... ...) (t ... ... ...)) (org-capture-empty-lines-b= efore) (setq beg (point)) (org-capture-verify-tree txt) (org-paste-subtree = level txt (quote for-yank)) (org-capture-empty-lines-after 1) (org-capture-= position-for-last-stored beg) (outline-next-heading) (setq end (point)) (or= g-capture-mark-kill-region beg (1- end)) (org-capture-narrow beg (1- end)) = (goto-char beg) (if (re-search-forward "%\\?" end t) (replace-match ""))) > org-capture-place-entry() > (cond ((member* type ...) (org-capture-place-entry)) ((eql type ...) (o= rg-capture-place-table-line)) ((eql type ...) (org-capture-place-plain-text= )) ((eql type ...) (org-capture-place-item)) ((eql type ...) (org-capture-p= lace-item))) > (case type ((nil entry) (org-capture-place-entry)) (table-line (org-cap= ture-place-table-line)) (plain (org-capture-place-plain-text)) (item (org-c= apture-place-item)) (checkitem (org-capture-place-item))) > (let* ((template ...) (type ...)) (case type (... ...) (table-line ...)= (plain ...) (item ...) (checkitem ...))) > org-capture-place-template() > (condition-case error (org-capture-place-template) ((error quit debug) = (if ... ...) (set-window-configuration ...) (error "Capture template `%s': = %s" ... ...))) > (if (equal goto 0) (org-capture-insert-template-here) (condition-case e= rror (org-capture-place-template) (... ... ... ...)) (if (and ... ...) (con= dition-case nil ... ...)) (if (org-capture-get :immediate-finish) (org-capt= ure-finalize nil))) > (cond ((equal entry "C") (customize-variable ...)) ((equal entry "q") (= error "Abort")) (t (org-capture-set-plist entry) (org-capture-get-template)= (org-capture-put :original-buffer orig-buf :original-file ... :original-fi= le-nondirectory ... :annotation annotation :initial initial) (org-capture-p= ut :default-time ...) (org-capture-set-target-location) (condition-case err= or ... ...) (setq org-capture-clock-keep ...) (if ... ... ... ... ...))) > (let* ((orig-buf ...) (annotation ...) (initial ...) (entry ...)) (when= (stringp initial) (remove-text-properties 0 ... ... initial)) (when (strin= gp annotation) (remove-text-properties 0 ... ... annotation)) (cond (... ..= .) (... ...) (t ... ... ... ... ... ... ... ...))) > (cond ((equal goto ...) (org-capture-goto-target)) ((equal goto ...) (o= rg-capture-goto-last-stored)) (t (let* ... ... ... ...))) > org-capture(nil) > call-interactively(org-capture nil nil) [I hope Achim Gratz takes a look at this: he would have a much better handle on what exactly is going wrong here - in particular, emacs on windows is a black box to me] org-called-interactively-p is in org-macs.el - it's probably the case that your autoloads are not up to date (or perhaps non-existent). Can you tell us exactly what zip file you got and how you installed it? In any case, try (load-library "org-macs") and then try the capture again: it probably will work this time (or you'll get a different error). This is not meant either as a solution or as a workaround: it is just meant to provide a data point about what is wrong and what exactly you need to do to restore sanity, so there is some ways to go yet. Nick PS For reference, here is what Mike posted earlier about his org initialization: ,---- | This is my org setup near the top of my .emacs |=20=20=20=20 | (add-to-list 'load-path "~/.emacs.d/org/org-7.8.11/contrib/lisp/") | (add-to-list 'load-path "~/.emacs.d/org/org-7.8.11/lisp/") | (require 'org-install) | (add-to-list 'auto-mode-alist '("\\.org$" . org-mode)) | (define-key global-map "\C-cl" 'org-store-link) | (define-key global-map "\C-ca" 'org-agenda) | (setq org-log-done t) |=20=20=20=20 | (setq org-capture-templates |=20=20=20=20 | =C2=A0=C2=A0=C2=A0=C2=A0=C2=A0 '(("t" "Todo" entry (file+headline "~/= org/gtd.org" "Tasks") | =C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2= =A0 "* TODO %?\n=C2=A0 %i\n=C2=A0 %a") | =C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0 ("j" "Journal" entry (file= +datetree "~/org/journal.org") | =C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2=A0=C2= =A0 "* %?\nEntered on %U\n=C2=A0 %i\n=C2=A0 %a"))) |=20=20=20=20 | ;org-capture binding | ;(global-set-key "\C-c-c" 'org-capture) | (global-set-key [(control c) (c)] 'org-capture) `----