emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
* remember/org error
@ 2007-10-12 16:28 Rick Moynihan
  2007-10-15 17:20 ` Rick Moynihan
  0 siblings, 1 reply; 2+ messages in thread
From: Rick Moynihan @ 2007-10-12 16:28 UTC (permalink / raw)
  To: emacs-orgmode

[-- Attachment #1: Type: text/plain, Size: 497 bytes --]

Hi all,

I keep getting the following error after performing a M-x remember, 
entering some text in the new buffer and pressing C-c C-c.  The 
following error occurs on the final C-c C-c.

(error "Invalid search bound (wrong side of point)")

As far as I know I have the configuration setup as specified in the org 
manual.

I've attached a backtrace.  I'm using what I downloaded as org 5.12b 
though org-version claims it is 5.12a.

Thanks again to everyone on the list; especially Carsten.

R.

[-- Attachment #2: remember-org-backtrace --]
[-- Type: text/plain, Size: 5072 bytes --]

Debugger entered--Lisp error: (error "Invalid search bound (wrong side of point)")
  re-search-forward("^[ 	]+" #<marker at 4321 in notes.org> t)
  (while (re-search-forward "^[ 	]+" end t) (goto-char (match-end 0)) (setq col (current-column)) (if (< diff 0) (replace-match "")) (indent-to (+ diff col)))
  (if (save-excursion (end-of-line 1) (re-search-forward prohibit end t)) nil (while (re-search-forward "^[ 	]+" end t) (goto-char ...) (setq col ...) (if ... ...) (indent-to ...)))
  (unless (save-excursion (end-of-line 1) (re-search-forward prohibit end t)) (while (re-search-forward "^[ 	]+" end t) (goto-char ...) (setq col ...) (if ... ...) (indent-to ...)))
  (let ((end ...) (prohibit ...) col) (unless (save-excursion ... ...) (while ... ... ... ... ...)) (move-marker end nil))
  (save-excursion (let (... ... col) (unless ... ...) (move-marker end nil)))
  org-fixup-indentation(1)
  (if org-adapt-indentation (org-fixup-indentation diff))
  (let* ((level ...) (down-head ...) (diff ...)) (replace-match down-head nil t) (and org-auto-align-tags (org-set-tags nil t)) (if org-adapt-indentation (org-fixup-indentation diff)))
  org-demote()
  funcall(org-demote)
  (if (and (re-search-forward ... nil t) (< ... end)) (funcall fun))
  (save-excursion (setq end (copy-marker end)) (goto-char beg) (if (and ... ...) (funcall fun)) (while (and ... ...) (funcall fun)))
  (let ((org-ignore-region t)) (save-excursion (setq end ...) (goto-char beg) (if ... ...) (while ... ...)))
  org-map-region(org-demote 4278 4319)
  (while (not (= shift 0)) (org-map-region func (point-min) (point-max)) (setq shift (+ delta shift)))
  (save-restriction (narrow-to-region beg end) (while (not ...) (org-map-region func ... ...) (setq shift ...)) (goto-char (point-min)))
  (if (= shift 0) nil (save-restriction (narrow-to-region beg end) (while ... ... ...) (goto-char ...)))
  (unless (= shift 0) (save-restriction (narrow-to-region beg end) (while ... ... ...) (goto-char ...)))
  (let* ((txt ...) (^re ...) (re ...) (^re_ ...) (old-level ...) (force-level ...) (previous-level ...) (next-level ...) (new-level ...) (shift ...) (shift1 shift) (delta ...) (func ...) (org-odd-levels-only nil) beg end) (if force-level (delete-region ... ...)) (beginning-of-line 1) (setq beg (point)) (insert txt) (unless (string-match "\n[ 	]*\\'" txt) (insert "\n")) (setq end (point)) (goto-char beg) (unless (= shift 0) (save-restriction ... ... ...)) (when (interactive-p) (message "Clipboard pasted as level %d subtree" new-level)) (if (and kill-ring ... org-subtree-clip-folded) (hide-subtree)))
  org-paste-subtree(2 "* Fri Oct 12 17:20:30 2007 (foo)\n  foo\n  ")
  (save-restriction (widen) (goto-char (point-max)) (if (not ...) (newline)) (org-paste-subtree (org-get-legal-level 1 1) txt))
  (cond ((org-on-heading-p t) (org-back-to-heading t) (setq level ...) (cond ... ... ... ...)) ((and ... ...) (save-restriction ... ... ... ...)) ((and ... reversed) (save-restriction ... ... ... ... ...)) (t (org-paste-subtree ... txt)))
  (save-restriction (widen) (and (goto-char ...) (not ...) (insert "\n* " ... "\n")) (setq reversed (org-notes-order-reversed-p)) (when (and heading ... ...) (goto-char ...) (if ... ... ...)) (if fastp (setq spos org-goto-start-pos exitcmd ...) (setq spos ... exitcmd ... spos ...)) (if (not spos) (throw ... nil)) (goto-char spos) (cond (... ... ... ...) (... ...) (... ...) (t ...)) (when remember-save-after-remembering (save-buffer) (if ... ...)))
  (save-excursion (save-restriction (widen) (and ... ... ...) (setq reversed ...) (when ... ... ...) (if fastp ... ...) (if ... ...) (goto-char spos) (cond ... ... ... ...) (when remember-save-after-remembering ... ...)))
  (save-current-buffer (set-buffer (or visiting ...)) (unless (org-mode-p) (error "Target files for remember notes must be in Org-mode")) (save-excursion (save-restriction ... ... ... ... ... ... ... ... ...)))
  (with-current-buffer (or visiting (get-file-buffer file)) (unless (org-mode-p) (error "Target files for remember notes must be in Org-mode")) (save-excursion (save-restriction ... ... ... ... ... ... ... ... ...)))
  (let* ((txt ...) (fastp ...) (file ...) (heading org-remember-default-headline) (visiting ...) (org-startup-folded nil) (org-startup-align-all-tables nil) (org-goto-start-pos 1) spos exitcmd level indent reversed) (if (and ... org-remember-previous-location) (setq file ... heading ...)) (setq current-prefix-arg nil) (let* (... first) (setq first ... lines ...) (if ... ... ...) (if ... ...) (setq txt ...)) (if (not visiting) (find-file-noselect file)) (with-current-buffer (or visiting ...) (unless ... ...) (save-excursion ...)))
  (catch (quote quit) (if org-note-abort (throw ... nil)) (let* (... ... ... ... ... ... ... ... spos exitcmd level indent reversed) (if ... ...) (setq current-prefix-arg nil) (let* ... ... ... ... ...) (if ... ...) (with-current-buffer ... ... ...)))
  org-remember-handler()
  run-hook-with-args-until-success(org-remember-handler)
  remember-region(1 5)
  remember-buffer()
  call-interactively(remember-buffer)

[-- Attachment #3: Type: text/plain, Size: 204 bytes --]

_______________________________________________
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

^ permalink raw reply	[flat|nested] 2+ messages in thread

end of thread, other threads:[~2007-10-15 17:20 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2007-10-12 16:28 remember/org error Rick Moynihan
2007-10-15 17:20 ` Rick Moynihan

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).