mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-12 06:41:13 +02:00
Code Activity

* posix.c (scm_getpwuid): If we can't find an entry, return our

Browse source 
own message, instead of using scm_syserror --- the getpwMUMBLE
functions don't set `errno' to anything interesting.
This commit is contained in:
Jim Blandy 1998-10-03 14:10:18 +00:00
parent 0553d3a207
commit 20752a3415
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/posix.c
View file

@ -279,7 +279,7 @@ scm_getpwuid (user)
entry = getpwnam (SCM_ROCHARS (user)); entry = getpwnam (SCM_ROCHARS (user));
} }
if (!entry) if (!entry)
scm_syserror (s_getpwuid); scm_misc_error (s_getpwuid, "entry not found", SCM_EOL);
ve[0] = scm_makfrom0str (entry->pw_name); ve[0] = scm_makfrom0str (entry->pw_name);
ve[1] = scm_makfrom0str (entry->pw_passwd); ve[1] = scm_makfrom0str (entry->pw_passwd);