diff options
Diffstat (limited to 'doc/ref/web.texi')
| -rw-r--r-- | doc/ref/web.texi | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/doc/ref/web.texi b/doc/ref/web.texi index 62b25d889..f589cfbf7 100644 --- a/doc/ref/web.texi +++ b/doc/ref/web.texi @@ -1,6 +1,6 @@ @c -*-texinfo-*- @c This is part of the GNU Guile Reference Manual. -@c Copyright (C) 2010, 2011, 2012, 2013, 2015, 2018 Free Software Foundation, Inc. +@c Copyright (C) 2010, 2011, 2012, 2013, 2015, 2018, 2019 Free Software Foundation, Inc. @c See the file guile.texi for copying conditions. @node Web @@ -458,11 +458,11 @@ HTTP stack like this: @example (declare-header! "X-Client-Address" (lambda (str) - (inet-aton str)) + (inet-pton AF_INET str)) (lambda (ip) (and (integer? ip) (exact? ip) (<= 0 ip #xffffffff))) (lambda (ip port) - (display (inet-ntoa ip) port))) + (display (inet-ntop AF_INET ip) port))) @end example @deffn {Scheme Procedure} declare-opaque-header! name |