|
@@ -55,10 +55,7 @@
|
|
|
|
|
|
|
|
(eval-when (:load-toplevel :execute)
|
|
(eval-when (:load-toplevel :execute)
|
|
|
;; Load config file
|
|
;; Load config file
|
|
|
- (alexandria:when-let (file (probe-file
|
|
|
|
|
- (merge-pathnames "config.lisp"
|
|
|
|
|
- (asdf:component-pathname
|
|
|
|
|
- (asdf:find-system '#:chatikbot)))))
|
|
|
|
|
|
|
+ (alexandria:when-let (file (probe-file "config.lisp"))
|
|
|
(load file))
|
|
(load file))
|
|
|
|
|
|
|
|
;; Init database
|
|
;; Init database
|
