Get a directory list without symlinks

[Xixo]

Hi all.

Probabily a simple problem for you (I hope!).

I'm tryng to get a list from directory() without symlinks.

I mean only folders and real files.

I look around with no luck.

Is it possible?

Thanks in advance for any help!



Xixo

[Xixo]

Found:



http://www.newlisp.org/index.cgi?page=Code_Snippets">http://www.newlisp.org/index.cgi?page=Code_Snippets



(define (link? path-name)

   (= 0120000 (& (file-info path-name 1) 0120000)))



Sorry for the noise!



X.