From: Stelian Ionescu <sionescu@cddr.org>
Date: Sun, 13 Jan 2013 22:23:36 +0000 (+0100)
Subject: Use ASDF/PACKAGE:SYMBOL-CALL
X-Git-Tag: v0.8.0~18
X-Git-Url: https://repo.or.cz/w/iolib.git/commitdiff_plain/451268878e5f28279b9a764ba9e257a85aa43d37

Use ASDF/PACKAGE:SYMBOL-CALL
---

diff --git a/src/iolib.base.asd b/src/iolib.base.asd
index 94186d3..012f292 100644
--- a/src/iolib.base.asd
+++ b/src/iolib.base.asd
@@ -15,16 +15,13 @@
    (:file "pkgdcl" :depends-on ("conduits" #+scl "scl-gray-streams")
     :perform
     (asdf:compile-op :before (o c)
-      (funcall (find-symbol (string '#:load-gray-streams)
-                            :iolib.conf)))
+      (asdf/package:symbol-call :iolib.conf '#:load-gray-streams))
     :perform
     (asdf:load-op :before (o c)
-      (funcall (find-symbol (string '#:load-gray-streams)
-                            :iolib.conf)))
+      (asdf/package:symbol-call :iolib.conf '#:load-gray-streams))
     :perform
     (asdf:load-source-op :before (o c)
-      (funcall (find-symbol (string '#:load-gray-streams)
-                            :iolib.conf))))
+      (asdf/package:symbol-call :iolib.conf '#:load-gray-streams)))
    (:file "gray-streams"
     :depends-on ("pkgdcl" #+scl "scl-gray-streams"))
    (:file "definitions" :depends-on ("pkgdcl"))