diff options
author | Hugo Hörnquist <hugo@lysator.liu.se> | 2023-10-23 03:16:46 +0200 |
---|---|---|
committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2023-10-23 03:16:46 +0200 |
commit | 61b1751c4bc94b4c2fe0398341bf61377e30b280 (patch) | |
tree | ad02448ce0354e816b125c4f6e7f3ef6d97d7502 /tests/unit | |
parent | Fixup in documentation. (diff) | |
download | calp-61b1751c4bc94b4c2fe0398341bf61377e30b280.tar.gz calp-61b1751c4bc94b4c2fe0398341bf61377e30b280.tar.xz |
Propstat stash.
Diffstat (limited to 'tests/unit')
-rw-r--r-- | tests/unit/webdav/webdav-propfind.scm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/tests/unit/webdav/webdav-propfind.scm b/tests/unit/webdav/webdav-propfind.scm index 74511419..b3cc861f 100644 --- a/tests/unit/webdav/webdav-propfind.scm +++ b/tests/unit/webdav/webdav-propfind.scm @@ -18,11 +18,11 @@ (define (sort-propstats propstats) (map (lambda (propstat) - (make-propstat (propstat-status-code propstat) - (sort* (propstat-property propstat) - string< (compose symbol->string xml-element-tagname car)) - (propstat-error propstat) - (propstat-response-description propstat))) + (propstat (propstat-status-code propstat) + (sort* (propstat-property propstat) + string< (compose symbol->string xml-element-tagname car)) + (propstat-error propstat) + (propstat-response-description propstat))) (sort* propstats < propstat-status-code))) |