From 3c14a1e2c545477282e66679bf2a755ee11fcd23 Mon Sep 17 00:00:00 2001 From: Juanjo Garcia-Ripoll Date: Tue, 15 Oct 2013 09:48:59 +0200 Subject: [PATCH] Fixed proclamation of ensure-directories-exist --- src/cmp/proclamations.lsp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/cmp/proclamations.lsp b/src/cmp/proclamations.lsp index 9e3f8307a..c1ef62678 100644 --- a/src/cmp/proclamations.lsp +++ b/src/cmp/proclamations.lsp @@ -1036,7 +1036,7 @@ (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))