diff options
Diffstat (limited to 'tests')
-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))) |