Fixed proclamation of ensure-directories-exist
authorJuanjo Garcia-Ripoll <jjgarcia@users.sourcerforge.net>
Tue, 15 Oct 2013 07:48:59 +0000 (09:48 +0200)
committerJuanjo Garcia-Ripoll <jjgarcia@users.sourcerforge.net>
Tue, 15 Oct 2013 07:48:59 +0000 (09:48 +0200)
src/cmp/proclamations.lsp

index 9e3f830..c1ef626 100644 (file)
 
 (proclamation directory (pathname-designator &key) list)
 (proclamation probe-file (pathname-designator) (or pathname null))
-(proclamation ensure-directories-exist (pathname &key)
+(proclamation ensure-directories-exist (pathname-designator &key)
               (values pathname gen-bool))
 (proclamation truename (pathname-designator) pathname)
 (proclamation file-author (pathname-designator) (or string null))