projects
/
mit-scheme.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
18f4962
)
cref/conpkg.scm: Fourth slot of import links: 'deprecated, not #t.
author
Matt Birkholz
<matt@birchwood-abbey.net>
Sun, 26 Feb 2017 08:21:44 +0000
(
01:21
-0700)
committer
Matt Birkholz
<matt@birchwood-abbey.net>
Sun, 26 Feb 2017 08:21:44 +0000
(
01:21
-0700)
src/cref/conpkg.scm
patch
|
blob
|
history
diff --git
a/src/cref/conpkg.scm
b/src/cref/conpkg.scm
index 1732a056a0149db439a78364a373954292223493..f2459394fe4b27454642c504fd2634464f66f5e2 100644
(file)
--- a/
src/cref/conpkg.scm
+++ b/
src/cref/conpkg.scm
@@
-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?)))))