[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Orgmode] org-insert-link doesn't work on xemacs with org-5.02
From: |
Dr. Volker Zell |
Subject: |
[Orgmode] org-insert-link doesn't work on xemacs with org-5.02 |
Date: |
Thu, 12 Jul 2007 14:26:58 +0200 |
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
- [Orgmode] org-insert-link doesn't work on xemacs with org-5.02,
Dr. Volker Zell <=