Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search
 

[REBOL] Re: getting a list of files in recursive directories

From: rebol665:ifrance at: 5-Nov-2002 21:14

Hi I am use this to print the content of my cd : source: %/e/ pf: func [rep [file!] fic [file!]][ if dir? rep [ print [ fic ] foreach x read rep [ either dir? n-rep: join rep x [ pf n-rep x ][ print ["^(tab)" x] ] ] ] ] pf source %/ HTH Ciao Pat