cref/conpkg.scm: Fourth slot of import links: 'deprecated, not #t.
authorMatt Birkholz <matt@birchwood-abbey.net>
Sun, 26 Feb 2017 08:21:44 +0000 (01:21 -0700)
committerMatt Birkholz <matt@birchwood-abbey.net>
Sun, 26 Feb 2017 08:21:44 +0000 (01:21 -0700)
src/cref/conpkg.scm

index 1732a056a0149db439a78364a373954292223493..f2459394fe4b27454642c504fd2634464f66f5e2 100644 (file)
@@ -115,7 +115,8 @@ USA.
                        (let ((dn (binding/name destination))
                              (sp (package/name (binding/package source)))
                              (sn (binding/name source))
-                             (d? (binding/deprecated? source)))
+                             (d? (and (binding/deprecated? source)
+                                      'deprecated)))
                          (if (and (not d?) (eq? dn sn))
                              (vector dn sp)
                              (vector dn sp sn d?)))))