From 08cb8a4848f8247b3fd06f6a26df244b3cc06d26 Mon Sep 17 00:00:00 2001 From: Keita Haga Date: Thu, 18 Nov 2010 03:44:25 +0900 Subject: [PATCH] io.files.info.unix: fix a couple of set-file-permissions examples --- basis/io/files/info/unix/unix-docs.factor | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/basis/io/files/info/unix/unix-docs.factor b/basis/io/files/info/unix/unix-docs.factor index 7b98788226..d66520fa02 100644 --- a/basis/io/files/info/unix/unix-docs.factor +++ b/basis/io/files/info/unix/unix-docs.factor @@ -102,15 +102,15 @@ HELP: set-file-permissions { "path" "a pathname string" } { "n" "an integer, interepreted as a string of bits" } } { $description "Sets the file permissions for a given file with the supplied Unix permissions integer. Supplying an octal number with " { $link POSTPONE: OCT: } " is recommended." } { $examples "Using the tradidional octal value:" - { $unchecked-example "USING: io.files.unix kernel ;" + { $unchecked-example "USING: io.files.info.unix kernel ;" "\"resource:license.txt\" OCT: 755 set-file-permissions" "" } "Higher-level, setting named bits:" - { $unchecked-example "USING: io.files.unix kernel math.bitwise ;" + { $unchecked-example "USING: io.files.info.unix kernel literals ;" "\"resource:license.txt\"" - "{ USER-ALL GROUP-READ GROUP-EXECUTE OTHER-READ OTHER-EXECUTE }" - "flags set-file-permissions" + "flags{ USER-ALL GROUP-READ GROUP-EXECUTE OTHER-READ OTHER-EXECUTE }" + "set-file-permissions" "" } } ;