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

[REBOL] make-dir

From: fantam::mailandnews::com at: 5-Sep-2000 20:52

Hello all, I've experienced that make-dir in a ftp context doesn't create the directories as expected. Instead of creating sub-directories, it creates them one next to the the other along the root directory. Here is the code I used: system/schemes/ftp/passive: true xoom: ftp://user:[pass--ftp--xoom--com]/backup/ file: %/d/mail/loose/test.txtr path: dirize join xoom to-file remove next parse/all first split-path file "/" print ["transferring:" join path second split-path file] if not exists? path [ temp-path: copy xoom foreach item remove next parse/all first split-path file "/" [ temp-path: append temp-path join item "/" print temp-path if not exists? temp-path [make-dir temp-path] ] ] write/binary join path second split-path file read/binary file Thanks in advance for your thoughts on this. -- Fantam