[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[bongo-devel] Re: Missing x-get-selection, m3u wish
From: |
Dieter Deyke |
Subject: |
[bongo-devel] Re: Missing x-get-selection, m3u wish |
Date: |
Sat, 03 Feb 2007 08:22:52 -0700 |
User-agent: |
Gnus/5.110006 (No Gnus v0.6) Emacs/22.0.93 (windows-nt) |
address@hidden (Daniel Jensen) writes:
> Dieter Deyke <address@hidden> writes:
>
>> I am trying to use bongo-insert-uri on my emacs running natively on
>> Windows XP, but do get a missing function error for x-get-selection.
>> Could it be that the code using it is X windows specific?
>
> I think I found the bug, but I cannot test it myself. On MS Windows,
> x-get-selection is redefined, but x-get-clipboard is not. Does this
> patch fix the problem for you?
>
> --- bongo-old/bongo.el 2007-01-15 14:15:44.000000000 +0100
> +++ bongo-new/bongo.el 2007-02-03 11:53:21.000000000 +0100
> @@ -6171,7 +6171,7 @@
> (let ((primary (x-get-selection)))
> (and (bongo-uri-p primary) primary)))
> (and (x-selection-exists-p 'CLIPBOARD)
> - (let ((clipboard (x-get-clipboard)))
> + (let ((clipboard (x-get-selection 'CLIPBOARD)))
> (and (bongo-uri-p clipboard) clipboard)))))
> (uri
> (read-string (concat "Insert URI"
>
>> BTW, it would be nice to be able to insert .m3u files into a playlist
>> buffer.
>
> You can customize `bongo-custom-backend-matchers' for this. Or maybe
> you would like the m3u files to be handled in a special way?
The patch now generates a different error:
Debugger entered--Lisp error: (wrong-type-argument stringp nil)
string-match("\\(?:\\`\\([a-zA-Z]\\(?:\\(?:address@hidden&!*\"'(),]\\)\\|\\(?:%[[:xdigit:]]\\{2\\}\\)\\)+\\):\\)"
nil)
(if (string-match (eval-when-compile ...) file-name) (progn (match-string 1
file-name)))
(when (string-match (eval-when-compile ...) file-name) (match-string 1
file-name))
bongo-uri-scheme(nil)
(null (bongo-uri-scheme file-name))
(not (null (bongo-uri-scheme file-name)))
bongo-uri-p(nil)
(and (bongo-uri-p clipboard) clipboard)
(let ((clipboard ...)) (and (bongo-uri-p clipboard) clipboard))
(and (x-selection-exists-p (quote CLIPBOARD)) (let (...) (and ... clipboard)))
(or (and (x-selection-exists-p) (let ... ...)) (and (x-selection-exists-p
...) (let ... ...)))
(let* ((default-uri ...) (uri ...) (title ...)) (list uri title))
call-interactively(bongo-insert-uri)
In response to .m3u: I was thinking that inserting a .m3u file (a
playlist) would somewhat work just like inserting a directory, so that
it would insert the files referenced in the playlist as individual
files under a playlist heading.
Thanks,
--
Dieter Deyke
mailto:address@hidden mailto:address@hidden mailto:address@hidden
Vs lbh pna ernq guvf, lbh unir jnl gbb zhpu gvzr.
- [bongo-devel] Missing x-get-selection, m3u wish, Dieter Deyke, 2007/02/02
- [bongo-devel] Re: Missing x-get-selection, m3u wish, Dieter Deyke, 2007/02/02
- [bongo-devel] Re: Missing x-get-selection, m3u wish, Daniel Jensen, 2007/02/03
- [bongo-devel] Re: Missing x-get-selection, m3u wish,
Dieter Deyke <=
- Re: [bongo-devel] Re: Missing x-get-selection, m3u wish, Daniel Brockman, 2007/02/03
- Re: [bongo-devel] Re: Missing x-get-selection, m3u wish, Dieter Deyke, 2007/02/04
- Re: [bongo-devel] Re: Missing x-get-selection, m3u wish, Daniel Brockman, 2007/02/04
- Re: [bongo-devel] Re: Missing x-get-selection, m3u wish, Dieter Deyke, 2007/02/04
- Re: [bongo-devel] Re: Missing x-get-selection, m3u wish, Daniel Brockman, 2007/02/04
- [bongo-devel] Re: Missing x-get-selection, m3u wish, Daniel Jensen, 2007/02/05
- Re: [bongo-devel] Re: Missing x-get-selection, m3u wish, Daniel Brockman, 2007/02/05
- [bongo-devel] Re: Missing x-get-selection, m3u wish, Dieter Deyke, 2007/02/05
- Re: [bongo-devel] Re: Missing x-get-selection, m3u wish, Daniel Brockman, 2007/02/05
- Re: [bongo-devel] Re: Missing x-get-selection, m3u wish, Dieter Deyke, 2007/02/05