X-Git-Url: https://git.rrq.au/?a=blobdiff_plain;f=autorecommended.lsp;h=ef3a595106d4d526c70aae50d1b266e25f342d20;hb=adac785b1f4ad065ce6ab15839b159050bb1ec2a;hp=2dd4945773def488705ab01b117ebce291454a2a;hpb=6ee1c6bada019d1fccdbe9706265a0beea1f5f48;p=rrq%2Fnewlisp-ftw.git

diff --git a/autorecommended.lsp b/autorecommended.lsp
index 2dd4945..ef3a595 100755
--- a/autorecommended.lsp
+++ b/autorecommended.lsp
@@ -100,6 +100,6 @@
 
 (let ((Y (difference INSTALLED (closure MANUAL))))
   (write-line 2 (format "=> %d automatic recommended packages" (length Y)))
-  (map println Y))
+  (map (fn (P) (println P " by " (join (or (REC P) '("???")) " "))) Y))
 
 (exit 0)