Automatically install the tilde expander after the system is loaded. From David Licht...

diff --git a/tilde.asd b/tilde.asd
index 2145515..088d149 100644 (file)
--- a/tilde.asd
+++ b/tilde.asd
@@ -3,3 +3,6 @@
 (asdf:defsystem #:tilde
   :depends-on (#:sb-posix)
   :components ((:file "tilde")))
+
+(defmethod perform :after ((o load-op) (c (eql (find-system "tilde"))))
+  (funcall (find-symbol "INSTALL-TILDE-EXPANDER" :tilde)))