Changeset 3709
- Timestamp:
- 07/31/08 14:00:25 (4 months ago)
- Files:
-
- trunk/bknr/web/src/web/web-utils.lisp (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/bknr/web/src/web/web-utils.lisp
r3398 r3709 47 47 (apply #'bknr.images:import-image (upload-pathname upload) 48 48 :name (pathname-name (upload-original-filename upload)) 49 :type ( make-keyword-from-string (pathname-type (upload-original-filename upload))) args))49 :type (image-type-symbol (upload-content-type upload)) args)) 50 50 51 51 (defun all-request-params ()
