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

[bpt/guile.git] / libguile / posix.c

diff --git a/libguile/posix.c b/libguile/posix.c
index 585b247..e35c640 100644 (file)
--- a/libguile/posix.c
+++ b/libguile/posix.c
@@ -279,7 +279,7 @@ scm_getpwuid (user)
       entry = getpwnam (SCM_ROCHARS (user));
     }
   if (!entry)
-    scm_syserror (s_getpwuid);
+    scm_misc_error (s_getpwuid, "entry not found", SCM_EOL);
 
   ve[0] = scm_makfrom0str (entry->pw_name);
   ve[1] = scm_makfrom0str (entry->pw_passwd);