Re: [Texmacs-dev] file dialog

[François Poulain]

Hi,

 Le Wed, 6 Nov 2013 17:29:07 +0100, Michael Lachmann
<address@hidden> 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 <address@hidden>