1 files changed, 26 insertions, 0 deletions
diff --git a/etc/lisp-cli/init.lisp b/etc/lisp-cli/init.lisp
index 0f01d57..062446e 100644
--- a/etc/lisp-cli/init.lisp
+++ b/etc/lisp-cli/init.lisp
@@ -3,3 +3,29 @@
                                        (user-homedir-pathname))))
   (when (probe-file quicklisp-init)
     (load quicklisp-init)))
+
+(defun load-once (p)
+  (let ((k (intern
+            (concatenate 'string
+                         (string :ql/)
+                         (string p))
+            "KEYWORD")))
+    (unless (member k *features*)
+      (ql:quickload p)
+      (pushnew k *features*))
+    k))
+
+(mapcar #'load-once
+        (list
+         :cl-ppcre
+         :cffi
+         :trivial-dump-core
+         :named-readtables
+         :rstring))
+
+(mapcar (lambda (p)
+          (pushnew (concatenate 'string p "/") cffi:*foreign-library-directories*
+                   :test #'equal))
+        (cl-ppcre:split ":" (uiop:getenv "LIBRARY_PATH")))
+
+(load-once :cl-fswatch)