Raymond Toy pushed to branch issue-269-unix-get-user-homedir at cmucl / cmucl

Commits: 6066da35 by Raymond Toy at 2023-11-17T09:10:44-08:00 Fix typos in test.

It should be `LET*` instead of `LET` and it's `info-name` instead of `user-name`.

- - - - -

1 changed file:

- tests/os.lisp

Changes:

===================================== tests/os.lisp ===================================== @@ -13,11 +13,11 @@ (user-info (unix:unix-getpwuid uid))) (assert-true uid) (assert-true user-info) - (let ((info-dir (unix:user-info-dir user-info)) - (info-name (unix:user-info-name user-info)) - (expected-home-pathname (pathname - (concatenate 'string info-dir "/"))) - (home-pathname (unix:unix-get-user-homedir user-name))) + (let* ((info-dir (unix:user-info-dir user-info)) + (info-name (unix:user-info-name user-info)) + (expected-home-pathname (pathname + (concatenate 'string info-dir "/"))) + (home-pathname (unix:unix-get-user-homedir info-name))) (assert-true info-dir) (assert-true info-name)

View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/6066da35b2229646412b5bef...