Export afs-permissions->string and string->afs-permissions
This commit is contained in:
parent
9fc600512c
commit
412c9985ac
|
@ -1,2 +1,5 @@
|
||||||
|
version 0.2
|
||||||
|
* export afs-permissions->string, string->afs-permissions
|
||||||
|
|
||||||
version 0.1
|
version 0.1
|
||||||
* New package system.
|
* New package system.
|
||||||
|
|
|
@ -49,6 +49,14 @@ Type predicate.
|
||||||
Returns #t if the permissions in AFS-PERMISSIONS1 are all included in
|
Returns #t if the permissions in AFS-PERMISSIONS1 are all included in
|
||||||
AFS-PERMISSIONS2, #f otherwise
|
AFS-PERMISSIONS2, #f otherwise
|
||||||
|
|
||||||
|
(afs-permissions->string afs-permissions) -> string
|
||||||
|
|
||||||
|
Returns the string representation of the afs-permissions.
|
||||||
|
|
||||||
|
|
||||||
|
(string->afs-permissions string) -> afs-permissions
|
||||||
|
|
||||||
|
Parses a string as afs-permissions.
|
||||||
|
|
||||||
|
|
||||||
(get-acl dir) -> afs-permissions
|
(get-acl dir) -> afs-permissions
|
||||||
|
|
|
@ -5,6 +5,8 @@
|
||||||
all-afs-permissions
|
all-afs-permissions
|
||||||
make-afs-permissions
|
make-afs-permissions
|
||||||
afs-permissions<=?
|
afs-permissions<=?
|
||||||
|
afs-permissions->string
|
||||||
|
string->afs-permissions
|
||||||
get-acl
|
get-acl
|
||||||
set-acl!
|
set-acl!
|
||||||
add-acl!
|
add-acl!
|
||||||
|
|
|
@ -1,5 +1,5 @@
|
||||||
(define-package "afs"
|
(define-package "afs"
|
||||||
(0 1)
|
(0 2)
|
||||||
((install-lib-version (1 0)))
|
((install-lib-version (1 0)))
|
||||||
(write-to-load-script
|
(write-to-load-script
|
||||||
`((config)
|
`((config)
|
||||||
|
|
Loading…
Reference in New Issue