summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xtags.tl5
1 files changed, 4 insertions, 1 deletions
diff --git a/tags.tl b/tags.tl
index 42c52910..07c39898 100755
--- a/tags.tl
+++ b/tags.tl
@@ -88,7 +88,10 @@
(caseq (car form)
(load (fake-load (cadr form)))
(load-for (each ((clause (cdr form)))
- (fake-load (caddr clause))))
+ (tree-bind (kind sym arg) clause
+ (when (and (eq kind 'pkg)
+ (not (find-package sym)))
+ (fake-load (caddr clause))))))
(defpackage (make-package (symbol-name (cadr form))))))
(defun fake-load (path)