*Setup* -I performed my org-mode update by downloading org-7.8.11.zip Then extracting using something like rt click, "extract here" I also ran a defun that I found on wiki pages with the subject "Compiling without make" (defun my/compile-org(&optional directory) "Compile all *.el files that come with org-mode." (interactive) .... *RUN Result* Without restarting Emacs I run m-: (load-library "org-macs") followed by org-capture Result: -Behavior was exactly the same bug we have been discussing (did not change). Here is the backtrace. Thanks Mike On Tue, Jun 5, 2012 at 12:01 PM, Nick Dokos wrote: > 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-before) (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)) (org-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 ...) > (org-capture-place-table-line)) ((eql type ...) > (org-capture-place-plain-text)) ((eql type ...) (org-capture-place-item)) > ((eql type ...) (org-capture-place-item))) > > (case type ((nil entry) (org-capture-place-entry)) (table-line > (org-capture-place-table-line)) (plain (org-capture-place-plain-text)) > (item (org-capture-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 > error (org-capture-place-template) (... ... ... ...)) (if (and ... ...) > (condition-case nil ... ...)) (if (org-capture-get :immediate-finish) > (org-capture-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-file-nondirectory ... :annotation annotation > :initial initial) (org-capture-put :default-time ...) > (org-capture-set-target-location) (condition-case error ... ...) (setq > org-capture-clock-keep ...) (if ... ... ... ... ...))) > > (let* ((orig-buf ...) (annotation ...) (initial ...) (entry ...)) > (when (stringp initial) (remove-text-properties 0 ... ... initial)) (when > (stringp annotation) (remove-text-properties 0 ... ... annotation)) (cond > (... ...) (... ...) (t ... ... ... ... ... ... ... ...))) > > (cond ((equal goto ...) (org-capture-goto-target)) ((equal goto ...) > (org-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 > | > | (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) > | > | (setq org-capture-templates > | > | '(("t" "Todo" entry (file+headline "~/org/gtd.org" "Tasks") > | "* TODO %?\n %i\n %a") > | ("j" "Journal" entry (file+datetree "~/org/journal.org") > | "* %?\nEntered on %U\n %i\n %a"))) > | > | ;org-capture binding > | ;(global-set-key "\C-c-c" 'org-capture) > | (global-set-key [(control c) (c)] 'org-capture) > `---- >