Changeset 3340
- Timestamp:
- 06/25/08 10:02:51 (7 months ago)
- Files:
-
- trunk/thirdparty/cl-webdav/specials.lisp (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/thirdparty/cl-webdav/specials.lisp
r3339 r3340 1 1 ;;; -*- Mode: LISP; Syntax: COMMON-LISP; Package: CL-WEBDAV; Base: 10 -*- 2 ;;; $Header: /usr/local/cvsrep/cl-webdav/specials.lisp,v 1. 9 2007/04/18 19:21:01edi Exp $2 ;;; $Header: /usr/local/cvsrep/cl-webdav/specials.lisp,v 1.10 2008/06/25 08:02:17 edi Exp $ 3 3 4 4 ;;; Copyright (c) 2007, Dr. Edmund Weitz. All rights reserved. … … 38 38 39 39 (defun constantly-nil (&rest args) 40 "Does the same as the result of \(CONSTANTLY NIL)." 40 41 (declare (ignore args)) 41 42 nil) 42 43 43 44 (defconstant +dav-property-alist+ 44 `(("creationdate" . creation-date)45 '(("creationdate" . creation-date) 45 46 ("displayname" . resource-display-name) 46 47 ("getcontentlength" . get-content-length)
