Hi,
Le Wed, 6 Nov 2013 17:29:07 +0100, Michael Lachmann
<[email protected]> a écrit :
> I really need to learn scheme better!
> Anyway, I'd like to call up a file dialog that lets you select a
> file, and then insert into the buffer
> <action| filename | (system "open 'filename'")>
>
> I got as far as
> (choose-file (lambda (f) (insert (url->string f))) "Please choose
> file" "") which inserts the filename
> but how do I insert the action?
Try :
(choose-file
(lambda (f)
(with f (url->string f)
(insert `(action ,f ,(string-append "(system \"open " f "\" )")))))
Notice that "open" is not portable.
François
--
François Poulain <[email protected]>
_______________________________________________
Texmacs-dev mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/texmacs-dev
