summaryrefslogtreecommitdiff
path: root/libguile/environments.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/environments.c')
-rw-r--r--libguile/environments.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/environments.c b/libguile/environments.c
index 58a4cff8b..541427641 100644
--- a/libguile/environments.c
+++ b/libguile/environments.c
@@ -816,7 +816,7 @@ update_catch_handler (void *ptr, SCM tag, SCM args)
SCM observer = data->observer;
SCM message = scm_makfrom0str ("Observer `~A' signals `~A' error: ~S");
- return scm_cons (message, SCM_LIST3 (observer, tag, args));
+ return scm_cons (message, scm_list_3 (observer, tag, args));
}