Fixed typo bug in set-file-group.
This commit is contained in:
parent
70679cd247
commit
1a1950d2f5
|
@ -313,8 +313,8 @@
|
||||||
(define-errno-syscall (set-file-group thing gid)
|
(define-errno-syscall (set-file-group thing gid)
|
||||||
(lambda (thing gid)
|
(lambda (thing gid)
|
||||||
(generic-file-op thing
|
(generic-file-op thing
|
||||||
(lambda (fd) (set-fdes-uid&gid/errno fd gid -1))
|
(lambda (fd) (set-fdes-uid&gid/errno fd -1 gid))
|
||||||
(lambda (fname) (set-file-uid&gid/errno fname gid -1)))))
|
(lambda (fname) (set-file-uid&gid/errno fname -1 gid)))))
|
||||||
|
|
||||||
|
|
||||||
;;; Uses real uid and gid, not effective. I don't use this anywhere.
|
;;; Uses real uid and gid, not effective. I don't use this anywhere.
|
||||||
|
|
Loading…
Reference in New Issue