[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [Orgmode] This is probably a misconfiguration rather than a bug, but
From: |
Sebastian Rose |
Subject: |
Re: [Orgmode] This is probably a misconfiguration rather than a bug, but... |
Date: |
Fri, 03 Sep 2010 02:05:29 +0200 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/24.0.50 (gnu/linux) |
"Tim O'Callaghan" <address@hidden> writes:
> When i try and use org-capture in a buffer, it fails to display the
> template menu, and it generates the backtrace below.
>
> It works for org files, but not for some other files.
>
> Tim.
If you pull the current Org version, the template menu should be there.
Just make sure, your variable `org-protocol-default-template-key' is nil
(which is the default since a few hours).
We always had the "w" template as the default of that variable for
historical reasons. I changed that, since this broke lately and I
wanted to avoid dependencies between the different source files
(org-capture.el and org-protocol.el in this case).
As an aside, the interactive template selection is now on by default
(just as long as the above variable is nil).
Sebastian
>
> Debugger entered--Lisp error: (wrong-type-argument stringp nil)
> directory-file-name(nil)
> (file-name-directory (directory-file-name dirpath))
> (let ((dirname ...) (basename ...)) (list dirname basename))
> org-git-split-dirpath(nil)
> (let ((dirlist ...)) (when (string= ... "") (throw ... nil)) (setq
> dir (first dirlist) relpath (concat ... relpath)))
> (while (not (file-exists-p ...)) (let (...) (when ... ...) (setq dir
> ... relpath ...)))
> (catch (quote toplevel) (while (not ...) (let ... ... ...)) (list
> (expand-file-name ".git" dir) relpath))
> (let ((dir ...) (relpath ...)) (catch (quote toplevel) (while ...
> ...) (list ... relpath)))
> org-git-gitrepos-p("~/.dotfiles/zemacsen/site-lisp/policy-switch.el")
> (if (org-git-gitrepos-p file) (progn (org-store-link-props :type
> "git" :link ...)))
> (when (org-git-gitrepos-p file) (org-store-link-props :type "git"
> :link (org-git-create-git-link file)))
> (let ((file ...)) (when (org-git-gitrepos-p file)
> (org-store-link-props :type "git" :link ...)))
> (progn (let (...) (when ... ...)))
> (if (buffer-file-name) (progn (let ... ...)))
> (when (buffer-file-name) (let (...) (when ... ...)))
> org-git-store-link()
> run-hook-with-args-until-success(org-git-store-link)
> (cond ((run-hook-with-args-until-success ...) (setq link ... desc
> ...)) ((equal ... "*Org Edit Src Example*") (let ... ... ... ... ...
> ... ... ...)) ((equal ... ...) (let ... ...)) ((eq major-mode ...)
> (let ... ... ...)) ((eq major-mode ...) (setq cpltxt ... link ...)
> (org-store-link-props :type "w3" :url ...)) ((eq major-mode ...) (setq
> cpltxt ... link ...) (org-store-link-props :type "w3m" :url ...))
> ((setq search ...) (setq link ...) (setq cpltxt ...)) ((eq major-mode
> ...) (setq cpltxt ... link ...) (org-store-link-props :type "image"
> :file buffer-file-name)) ((eq major-mode ...) (let ... ... ...)) ((and
> ... ...) (setq custom-id ...) (cond ... ... ...)) ((buffer-file-name
> ...) (setq cpltxt ...) (when ... ... ...) (setq link ...))
> ((interactive-p) (error "Cannot link to a buffer which is not visiting
> a file")) (t (setq link nil)))
> (let ((outline-regexp ...) link cpltxt desc description search txt
> custom-id agenda-link) (cond (... ...) (... ...) (... ...) (... ...)
> (... ... ...) (... ... ...) (... ... ...) (... ... ...) (... ...) (...
> ... ...) (... ... ... ...) (... ...) (t ...)) (if (consp link) (setq
> cpltxt ... link ...)) (setq link (or link cpltxt) desc (or desc
> cpltxt)) (if (equal desc "NONE") (setq desc nil)) (if (and ... link)
> (progn ... ... ...) (or agenda-link ...)))
> org-store-link(nil)
> (if (and (boundp ...) org-capture-link-is-already-stored) (plist-get
> org-store-link-plist :annotation) (org-store-link nil))
> (let* ((orig-buf ...) (annotation ...) (initial ...) (entry ...))
> (when initial (remove-text-properties 0 ... ... initial)) (when
> 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)
>
- [Orgmode] This is probably a misconfiguration rather than a bug, but..., Tim O'Callaghan, 2010/09/02
- Re: [Orgmode] This is probably a misconfiguration rather than a bug, but..., Carsten Dominik, 2010/09/02
- Re: [Orgmode] This is probably a misconfiguration rather than a bug, but..., Bastien, 2010/09/02
- Re: [Orgmode] This is probably a misconfiguration rather than a bug, but..., David Maus, 2010/09/02
- Re: [Orgmode] This is probably a misconfiguration rather than a bug, but...,
Sebastian Rose <=