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

[REBOL] set-modes problems

From: D::Weyand::gmx::de at: 31-Oct-2006 13:30

Hello list, I have some problems with set-modes for directories using REBOL/View on WindowsXP and asking for your help and advice. See below code and console log for reproducing the problem: set-file-attrib: func [ file [url! file!] attr [block!] ][ foreach [flag val] attr [ probe foo: compose [(flag) (val)] if error? err: try [set-modes file foo none][probe disarm err] ] ]
>> system/version
== 1.3.2.3.1
>> make-dir/deep d1: %foo/testdir1
== %foo/testdir1/
>> make-dir/deep d2: %foo/testdir2
== %foo/testdir2/
>> write f1: %foo/testfile1.txt "foo1" >> write f2: %foo/testfile2.txt "foo2" >> modes: get-modes f1 'file-modes
== [creation-date access-date modification-date owner-write archived hidden system]
>> attrib: get-modes file1 modes
== [creation-date: 31-Oct-2006/12:37:12+1:00 access-date: 31-Oct-2006/12:44:15+1:00 modification-date: 31-Oct-2006/1 2:44:15+1:00 ow...
>> set-modes f2 attrib >> equal? attrib get-modes file2 modes
== true
>> attrib: get-modes d1 modes
== [creation-date: 31-Oct-2006/12:36:35+1:00 access-date: 31-Oct-2006/12:36:35+1:00 modification-date: 31-Oct-2006/ 12:36:35+1:00 ow...
>> set-modes d2 attrib
** Access Error: Cannot open /C/temp/REBOL/Scripts/foo/foo/testdir2 ** Where: shutdown ** Near: set-modes d2 attrib
>> set-file-attrib d2 attrib
[creation-date: 31-Oct-2006/12:36:35+1:00] make object! [ code: 500 type: 'access id: 'cannot-open arg1: "/C/temp/REBOL/Scripts/foo/foo/testdir2" arg2: none arg3: none near: [set-modes file foo none] where: 'set-file-attrib ] [access-date: 31-Oct-2006/12:36:35+1:00] make object! [ code: 500 type: 'access id: 'cannot-open arg1: "/C/temp/REBOL/Scripts/foo/foo/testdir2" arg2: none arg3: none near: [set-modes file foo none] where: 'set-file-attrib ] [modification-date: 31-Oct-2006/12:36:35+1:00] make object! [ code: 500 type: 'access id: 'cannot-open arg1: "/C/temp/REBOL/Scripts/foo/foo/testdir2" arg2: none arg3: none near: [set-modes file foo none] where: 'set-file-attrib ] [owner-write: true] [archived: false] [hidden: false] [system: false] == none Do you know why itīs not possible to change the date attributes for directories with set-modes? It worked fine for files, why not for directories on WinXP? I donīt get those error messages on MacOS X, so it seems to be a Windows specific problem. Any further clues? Maybe itīs bug? I donīt know... PS: I am using NTFS with WindowsXP. Dirk -- Der GMX SmartSurfer hilft bis zu 70% Ihrer Onlinekosten zu sparen! Ideal für Modem und ISDN: http://www.gmx.net/de/go/smartsurfer