scsh-conservatory
/
scsh-0.6
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix bug in test case

This commit is contained in:
mainzelm 2006-03-23 11:07:10 +00:00
parent 2d4ce713b7
commit 4cd8cffe81
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
scsh/test/user-and-group-db-access.scm
View File

@ -32,5 +32,5 @@
(integer? group-id)
(list? group-mem)
(equal? user-name (user-info:name (user-info user-id)))
(equal? (user-info (getenv "USER")) (user-info:name (user-info user-id)))
(equal? (user-info:name (user-info (getenv "USER"))) user-name)
(equal? group-id (group-info:gid (group-info group-name)))))))