emacs-orgmode
[Top][All Lists]
Advanced

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

Re: [O] org-refile failing


From: Marcelo de Moraes Serpa
Subject: Re: [O] org-refile failing
Date: Wed, 5 Sep 2012 19:14:25 -0500

Here's the backtrace (debug-on-error set to t):

debugger entered--Lisp error: (invalid-regexp "Invalid content of \\{\\}")
  re-search-forward("^\\*\\{1,0\\}[ ]" nil t)
  (while (re-search-forward descre nil t) (goto-char (setq pos0 ...)) (catch (quote next) (when org-refile-target-verify-function ...) (when ... ... ... ...)) (when (= ... pos0) (goto-char ...)))
  (save-restriction (widen) (goto-char (point-min)) (while (re-search-forward descre nil t) (goto-char ...) (catch ... ... ...) (when ... ...)))
  (save-excursion (save-restriction (widen) (goto-char ...) (while ... ... ... ...)))
  (progn (if (bufferp f) (setq f ...)) (setq f (and f ...)) (if (eq org-refile-use-outline-path ...) (push ... tgs)) (save-excursion (save-restriction ... ... ...)))
  (or (setq tgs (org-refile-cache-get ... descre)) (progn (if ... ...) (setq f ...) (if ... ...) (save-excursion ...)))
  (save-current-buffer (set-buffer (if ... f ...)) (or (setq tgs ...) (progn ... ... ... ...)) (when org-refile-use-cache (org-refile-cache-put tgs ... descre)) (setq targets (append tgs targets)))
  (with-current-buffer (if (bufferp f) f (org-get-agenda-file-buffer f)) (or (setq tgs ...) (progn ... ... ... ...)) (when org-refile-use-cache (org-refile-cache-put tgs ... descre)) (setq targets (append tgs targets)))
  (while (setq f (pop files)) (with-current-buffer (if ... f ...) (or ... ...) (when org-refile-use-cache ...) (setq targets ...)))
  (while (setq entry (pop entries)) (setq files (car entry) desc (cdr entry)) (setq fast-path-p nil) (cond (... ...) (... ...) (... ...) (... ...)) (if (stringp files) (setq files ...)) (cond (... ...) (... ...) (... ...) (... ...) (... ... ...) (t ...)) (while (setq f ...) (with-current-buffer ... ... ... ...)))
  (save-current-buffer (set-buffer (or default-buffer ...)) (while (setq entry ...) (setq files ... desc ...) (setq fast-path-p nil) (cond ... ... ... ...) (if ... ...) (cond ... ... ... ... ... ...) (while ... ...)))
  (with-current-buffer (or default-buffer (current-buffer)) (while (setq entry ...) (setq files ... desc ...) (setq fast-path-p nil) (cond ... ... ... ...) (if ... ...) (cond ... ... ... ... ... ...) (while ... ...)))
  (let ((case-fold-search nil) (entries ...) targets tgs txt re files f desc descre fast-path-p level pos0) (message "Getting targets...") (with-current-buffer (or default-buffer ...) (while ... ... ... ... ... ... ...)) (message "Getting targets...done") (nreverse targets))
  org-refile-get-targets(nil (#("OneLogin MX Office" 0 8 (fontified t org-category "gtd" face org-level-1 org-no-flyspell t) 8 18 (fontified t org-category "gtd" face org-level-1)) #("A/C Quote + Room isolation quote" 0 32 (fontified t org-category "gtd" face org-level-2)) #("Write to Thomas with quote + isolation quote, explaining the situation" 0 70 (fontified t org-category "gtd" face org-level-3)) #("Headsets" 0 8 (fontified t org-category "gtd" face org-level-2)) #("Alartm System quote" 0 19 (fontified t org-category "gtd" face org-level-2))))
  (setq org-refile-target-table (org-refile-get-targets default-buffer excluded-entries))
  (let ((org-refile-targets org-refile-targets) (org-refile-use-outline-path org-refile-use-outline-path) excluded-entries) (when (and ... ... ...) (org-map-tree ...)) (setq org-refile-target-table (org-refile-get-targets default-buffer excluded-entries)))
  org-refile-get-location("Refile subtree \"OneLogin MX Office\" to" nil nil nil)
  (save-excursion (unless goto (org-back-to-heading t) (setq heading-text ...)) (org-refile-get-location (cond ... ... ...) default-buffer (and ... org-refile-allow-creating-parent-nodes) goto))
  (let (heading-text) (save-excursion (unless goto ... ...) (org-refile-get-location ... default-buffer ... goto)))
  (or rfloc (let (heading-text) (save-excursion ... ...)))
  (setq it (or rfloc (let ... ...)))
  (or (and (equal goto 2) org-clock-hd-marker (marker-buffer org-clock-hd-marker) (prog1 ... ...)) (setq it (or rfloc ...)))
  (if (or (and ... org-clock-hd-marker ... ...) (setq it ...)) (progn (setq file ... re ... pos ...) (if ... ...) (setq nbuf ...) (if goto ... ... ... ... ... ... ...)))
  (when (or (and ... org-clock-hd-marker ... ...) (setq it ...)) (setq file (nth 1 it) re (nth 2 it) pos (nth 3 it)) (if (and ... pos ... ...) (error "Cannot refile to position inside the tree or region")) (setq nbuf (or ... ...)) (if goto (progn ... ... ...) (if regionp ... ...) (with-current-buffer ... ... ...) (if regionp ... ...) (when ... ...) (setq org-markers-to-move nil) (message "Refiled to \"%s\" in file %s" ... file)))
  (if (equal goto (quote ...)) (org-refile-goto-last-stored) (when (or ... ...) (setq file ... re ... pos ...) (if ... ...) (setq nbuf ...) (if goto ... ... ... ... ... ... ...)))
  (let* ((cbuf ...) (regionp ...) (region-start ...) (region-end ...) (region-length ...) (filename ...) pos it nbuf file re level reversed) (setq last-command nil) (when regionp (goto-char region-start) (or ... ...) (setq region-start ...) (unless ... ...)) (if (equal goto ...) (org-refile-goto-last-stored) (when ... ... ... ... ...)))
  (if (member goto (quote ...)) (org-refile-cache-clear) (let* (... ... ... ... ... ... pos it nbuf file re level reversed) (setq last-command nil) (when regionp ... ... ... ...) (if ... ... ...)))
  org-refile(nil)
  call-interactively(org-refile t nil)
  execute-extended-command(nil)
  call-interactively(execute-extended-command nil nil)


On Wed, Sep 5, 2012 at 6:59 PM, Marcelo de Moraes Serpa <address@hidden> wrote:
Sorry Bastien, should have included it before.

Emacs:
GNU Emacs 23.4.1 (x86_64-apple-darwin, NS apple-appkit-1038.36) of 2012-01-29 on bob.porkrind.org

Org:
Org-mode version 7.9.1 (release_7.9.1-145-g0a6165-git @ mixed installation! /Applications/Emacs.app/Contents/Resources/lisp/org/ and /Users/fullofcaffeine/.emacs.d/vendor/org/lisp/)

To reproduce it, I just move the cursor to the beginning of  a headline like this:

* TODO Do something

And then M-x org-refile

Cheers,

- Marcelo.



On Wed, Sep 5, 2012 at 6:43 PM, Bastien <address@hidden> wrote:
Hi Marcelo,

Marcelo de Moraes Serpa <address@hidden> writes:

> When trying to run org-refile on an org entry, I'm getting the
> following error:
>
> while: Invalid regexp: "Invalid content of \\{\\}"

Can you give us your Org version, your Emacs version and a recipe
to reproduce this problem?  Refiling works fine here.

Thanks,

--
 Bastien



reply via email to

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