Permalink
Browse files

Show undocumented symbols in gray

This makes "NO DOCS!" not stand out so much vs. the more useful
docstrings.
  • Loading branch information...
1 parent 4faeda4 commit baae2bb4a0f501e8f5f605a4c86be9c86f67b440 @antifuchs antifuchs committed Dec 12, 2011
Showing with 5 additions and 1 deletion.
  1. +4 −0 manifest.css
  2. +1 −1 manifest.lisp
View
@@ -39,3 +39,7 @@ ul {
.symbol, .package {
text-transform: lowercase;
}
+
+tr.not-documented>td.docs {
+ color: gray;
+}
View
@@ -89,7 +89,7 @@ a true Common Lisp while still working in Allegro's mlisp."
(:table
(dolist (sym names)
(html
- (:tr
+ ((:tr :class (:format "~:[not-documented~;~]" (docs-for sym what)))
(:td :class "symbol" (:print (princ-to-string sym)))
(:td :class "docs" (:print (or (docs-for sym what) "NO DOCS!")))))))))

0 comments on commit baae2bb

Please sign in to comment.