Fixed typo bug in set-file-group.

This commit is contained in:
shivers 1997-04-02 20:12:33 +00:00
parent 70679cd247
commit 1a1950d2f5
1 changed files with 2 additions and 2 deletions

View File

@ -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.