diff options
| -rw-r--r-- | src/xfdf.lisp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/xfdf.lisp b/src/xfdf.lisp index d88c15d..a3ada7b 100644 --- a/src/xfdf.lisp +++ b/src/xfdf.lisp @@ -71,7 +71,7 @@ If `value` is anything else, return its identity." ((eq value nil) "Off") (t value))) -(defun build-xfdf-outer-field (name inner-fields-str indent) +(defun build-xfdf-outer-field (name inner-fields-string indent) "Build the XFDF XML for a field containing other fields." (format nil "~ ~v{~A~:*~}<field name=\"~A\"> @@ -80,7 +80,7 @@ If `value` is anything else, return its identity." indent '(" ") name -inner-fields-str +inner-fields-string indent '(" "))) |