summaryrefslogtreecommitdiff
path: root/sysdeps/guile/names/loadavg.c
diff options
context:
space:
mode:
authorMartin Baulig <martin@src.gnome.org>1998-06-11 23:53:16 +0000
committerMartin Baulig <martin@src.gnome.org>1998-06-11 23:53:16 +0000
commit321f5180f7681fe063a1f9f5a4b6e7231ddf8133 (patch)
treed9b023f67673b37af8f8235887a61c2b653f6f09 /sysdeps/guile/names/loadavg.c
parentd9874dca81d2a3aab99701c02e5d59fbe7e4db9f (diff)
downloadlibgtop-321f5180f7681fe063a1f9f5a4b6e7231ddf8133.tar.gz
Fixing mistakes from previous checkin.stable_after_mergeLIBGTOP_STABLE_0_20
Diffstat (limited to 'sysdeps/guile/names/loadavg.c')
-rw-r--r--sysdeps/guile/names/loadavg.c32
1 files changed, 14 insertions, 18 deletions
diff --git a/sysdeps/guile/names/loadavg.c b/sysdeps/guile/names/loadavg.c
index c12254b4..e82c8e9b 100644
--- a/sysdeps/guile/names/loadavg.c
+++ b/sysdeps/guile/names/loadavg.c
@@ -34,10 +34,9 @@ glibtop_guile_names_loadavg (void)
for (i = 0; i < GLIBTOP_MAX_LOADAVG; i++)
list = gh_append
- (list, gh_list
- (gh_str02scm (glibtop_names_loadavg [i]),
- SCM_UNDEFINED),
- SCM_UNDEFINED);
+ (gh_list (list,
+ gh_list (gh_str02scm (glibtop_names_loadavg [i])),
+ SCM_UNDEFINED));
return list;
}
@@ -52,10 +51,9 @@ glibtop_guile_types_loadavg (void)
for (i = 0; i < GLIBTOP_MAX_LOADAVG; i++)
list = gh_append
- (list, gh_list
- (gh_str02scm (glibtop_types_loadavg [i]),
- SCM_UNDEFINED),
- SCM_UNDEFINED);
+ (gh_list (list,
+ gh_list (gh_str02scm (glibtop_types_loadavg [i])),
+ SCM_UNDEFINED));
return list;
}
@@ -70,11 +68,10 @@ glibtop_guile_labels_loadavg (void)
for (i = 0; i < GLIBTOP_MAX_LOADAVG; i++)
list = gh_append
- (list, gh_list
- (gh_str02scm (gettext
- (glibtop_labels_loadavg [i])),
- SCM_UNDEFINED),
- SCM_UNDEFINED);
+ (gh_list (list,
+ gh_list (gh_str02scm (gettext
+ (glibtop_labels_loadavg [i]))),
+ SCM_UNDEFINED));
return list;
}
@@ -89,11 +86,10 @@ glibtop_guile_descriptions_loadavg (void)
for (i = 0; i < GLIBTOP_MAX_LOADAVG; i++)
list = gh_append
- (list, gh_list
- (gh_str02scm (gettext
- (glibtop_descriptions_loadavg [i])),
- SCM_UNDEFINED),
- SCM_UNDEFINED);
+ (gh_list (list,
+ gh_list (gh_str02scm (gettext
+ (glibtop_descriptions_loadavg [i]))),
+ SCM_UNDEFINED));
return list;
}