emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
* org-insert-link doesn't work on xemacs with org-5.02
@ 2007-07-12 12:26 Dr. Volker Zell
  2007-07-12 19:21 ` Carsten Dominik
  0 siblings, 1 reply; 2+ messages in thread
From: Dr. Volker Zell @ 2007-07-12 12:26 UTC (permalink / raw)
  To: Org mode

Hi

When trying to insert a link I get the following error with latest org-5.02 and xemacs:

Debugger entered--Lisp error: (wrong-type-argument listp "http:")
  apply(debug error (wrong-type-argument listp "http:"))
  edebug(error (wrong-type-argument listp "http:"))
  all-completions("l" ("http:" "https:" "ftp:" "mailto:" "file:" "news:" "bbdb:" "vm:" "wl:" "mhe:" "rmail:" "gnus:" "shell:" "info:" "elisp:") nil)
  hc-complete-stack-top("" nil t)
  hc-complete()
  #<compiled-function nil "...(15)" [last-command-char hc-stack char-to-string hc-complete] 3 ("/usr/local/share/xemacs/site-packages/lisp/misc/highlight-completion.elc" . 15857) nil>()
  call-interactively(hc-self-insert-char)
  read-minibuffer-internal("Link: ")
  byte-code("..." [standard-output standard-input prompt recursion-depth minibuffer-depth t read-minibuffer-internal] 2)
  read-from-minibuffer("Link: " nil #<keymap size 8 0xb992> nil tmphist nil nil)
  completing-read("Link: " ("http:" "https:" "ftp:" "mailto:" "file:" "news:" "bbdb:" "vm:" "wl:" "mhe:" "rmail:" "gnus:" "shell:" "info:" "elisp:") nil nil nil tmphist nil)
  apply(completing-read ("Link: " ("http:" "https:" "ftp:" "mailto:" "file:" "news:" "bbdb:" "vm:" "wl:" "mhe:" "rmail:" "gnus:" "shell:" "info:" "elisp:") nil nil nil tmphist nil))
  (let ((minibuffer-local-completion-map ...)) (org-defkey minibuffer-local-completion-map " " (quote self-insert-command)) (apply (quote completing-read) args))
  org-completing-read("Link: " ("http:" "https:" "ftp:" "mailto:" "file:" "news:" "bbdb:" "vm:" "wl:" "mhe:" "rmail:" "gnus:" "shell:" "info:" "elisp:") nil nil nil tmphist nil)
  (edebug-after (edebug-before 184) 203 (org-completing-read "Link: " (edebug-after ... 195 ...) nil nil nil (quote tmphist) (edebug-after ... 202 ...)))
  (setq link (edebug-after (edebug-before 184) 203 (org-completing-read "Link: " ... nil nil nil ... ...)))
  (edebug-after (edebug-before 183) 204 (setq link (edebug-after ... 203 ...)))
  (unwind-protect (edebug-after (edebug-before 183) 204 (setq link ...)) (edebug-after (edebug-before 205) 207 (set-window-configuration ...)) (edebug-after (edebug-before 208) 209 (kill-buffer "*Org Links*")))
  (edebug-after (edebug-before 182) 210 (unwind-protect (edebug-after ... 204 ...) (edebug-after ... 207 ...) (edebug-after ... 209 ...)))
  (cond ((edebug-after ... 24 ...) (edebug-after ... 32 ...) (edebug-after ... 40 ...) (edebug-after ... 48 ...)) ((edebug-after ... 56 ...) (edebug-after ... 70 ...)) ((edebug-after ... 73 ...) (edebug-after ... 77 ...) (edebug-after ... 142 ...)) (t (edebug-after ... 158 ...) (edebug-after ... 173 ...) (edebug-after ... 181 ...) (edebug-after ... 210 ...) (edebug-after ... 216 ...) (edebug-after ... 223 ...) (edebug-after ... 244 ...) (edebug-after ... 260 ...)))
  (edebug-after (edebug-before 21) 261 (cond (... ... ... ...) (... ...) (... ... ...) (t ... ... ... ... ... ... ... ...)))
  (let ((wcf ...) (region ...) tmphist link desc entry remove file) (edebug-after (edebug-before 21) 261 (cond ... ... ... ...)) (edebug-after (edebug-before 262) 274 (if ... ...)) (edebug-after (edebug-before 275) 305 (when ... ...)) (edebug-after (edebug-before 306) 374 (when ... ...)) (edebug-after (edebug-before 375) 379 (setq desc ...)) (edebug-after (edebug-before 380) 386 (unless ... ...)) (edebug-after (edebug-before 387) 392 (if ... ...)) (edebug-after (edebug-before 393) 398 (insert ...)))
  (edebug-after (edebug-before 0) 399 (let (... ... tmphist link desc entry remove file) (edebug-after ... 261 ...) (edebug-after ... 274 ...) (edebug-after ... 305 ...) (edebug-after ... 374 ...) (edebug-after ... 379 ...) (edebug-after ... 386 ...) (edebug-after ... 392 ...) (edebug-after ... 398 ...)))
  (lambda nil (edebug-after (edebug-before 0) 399 (let ... ... ... ... ... ... ... ... ...)))()
  edebug-enter(org-insert-link (nil) (lambda nil (edebug-after (edebug-before 0) 399 (let ... ... ... ... ... ... ... ... ...))))
  edebug-enter(org-insert-link (nil) (lambda nil (edebug-after (edebug-before 0) 399 (let ... ... ... ... ... ... ... ... ...))))
  org-insert-link(nil)
  call-interactively(org-insert-link)

  Ciao
    Volker

^ permalink raw reply	[flat|nested] 2+ messages in thread
end of thread, other threads:[~2007-07-12 20:08 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2007-07-12 12:26 org-insert-link doesn't work on xemacs with org-5.02 Dr. Volker Zell
2007-07-12 19:21 ` Carsten Dominik

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).