mirrors/pgloader
1
0
Fork 0
mirror of https://github.com/dimitri/pgloader.git synced 2026-05-05 02:46:10 +02:00
Code Issues Projects Releases Wiki Activity

Error out when asked to load a non-existing file.

Browse Source
This commit is contained in:
Dimitri Fontaine 2013-11-26 11:56:34 +01:00
parent de1afc7416
commit 98a7eb12a5
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
src/sources/sources.lisp
View File

@ -162,8 +162,11 @@
part root))
(if (probe-file candidate) candidate
(error "File does not exists: '~a'." candidate))))
(:filename (if (fad:pathname-absolute-p part) part
(merge-pathnames part root))))))
(:filename (let ((filename
(if (fad:pathname-absolute-p part) part
(merge-pathnames part root))))
(if (probe-file filename) filename
(error "File does not exists: '~a'." filename)))))))
;;;