debugged os

diff --git a/modules/language/python/module/os.scm b/modules/language/python/module/os.scm
index 03b0848d028176e538ebc254ff455129ee3bdf56..a735f131ade43fb267580909e0dba4aa717f88d4 100644 (file)
--- a/modules/language/python/module/os.scm
+++ b/modules/language/python/module/os.scm
@@ -87,7 +87,8 @@
                   supports_dir_fs support_effective_ids supports_fd
 
                   confstr confstr_names cpu_count sysconf sysconf_names
-
+                  getloadavg
+                  
                   RTLD_LAZY RTLD_NOW RTLD_GLOBAL RTLD_LOCAL RTLD_NODELETE
                   RTLD_NOLOAD RTLD_DEEPBIND
 
@@ -2259,14 +2260,14 @@
   (let ((id2 (if (number? id) id (pylist-ref sysconf_names id))))
     (if id2
         (sysconf_ id2)
-        (raise KeyError "no confstr for " id))))
+        (raise KeyError "no sysconf str for " id))))
 
 (defineu getloadavg ()
   (let ((f (pointer->procedure long
                                (dynamic-func "getloadavg"
                                              (dynamic-link))
                                (list '* int))))
-    (lambda (id)
+    (lambda ()
       (let* ((v  (make-bytevector (* 3 8)))
              (vp (bytevector->pointer v)))
         (rm (f vp 3))