diff options
Diffstat (limited to 'libguile/root.c')
| -rw-r--r-- | libguile/root.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/root.c b/libguile/root.c index 6779f6779..a0d092030 100644 --- a/libguile/root.c +++ b/libguile/root.c @@ -334,7 +334,7 @@ SCM_DEFINE (scm_call_with_dynamic_root, "call-with-dynamic-root", 2, 0, 0, "Before calling @var{thunk}, the dynamic-wind chain is un-wound back to\n" "the root and a new chain started for @var{thunk}. Therefore, this call\n" "may not do what you expect:\n\n" - "@example\n" + "@lisp\n" ";; Almost certainly a bug:\n" "(with-output-to-port\n" " some-port\n\n" @@ -344,7 +344,7 @@ SCM_DEFINE (scm_call_with_dynamic_root, "call-with-dynamic-root", 2, 0, 0, " (display 'fnord)\n" " (newline))\n" " (lambda (errcode) errcode))))\n" - "@end example\n\n" + "@end lisp\n\n" "The problem is, on what port will @samp{fnord} be displayed? You\n" "might expect that because of the @code{with-output-to-port} that\n" "it will be displayed on the port bound to @code{some-port}. But it\n" |