diff options
| -rw-r--r-- | tissue/commit.scm | 4 | ||||
| -rw-r--r-- | tissue/file-document.scm | 4 | ||||
| -rw-r--r-- | tissue/issue.scm | 9 | ||||
| -rw-r--r-- | tissue/web/server.scm | 17 |
4 files changed, 18 insertions, 16 deletions
diff --git a/tissue/commit.scm b/tissue/commit.scm index 10dc436..3dfd45f 100644 --- a/tissue/commit.scm +++ b/tissue/commit.scm @@ -98,8 +98,10 @@ object representing a list of search results." (class "search-result-title")) ,(document-title commit)) (div (@ (class "search-result-metadata")) + (span (@ (class ,(string-append "document-type commit-document-type"))) + "commit") ,(string-append - (format #f "authored ~a by ~a" + (format #f " authored ~a by ~a" (human-date-string (doc:commit-author-date commit)) (doc:commit-author commit)))) ,@(let ((snippet (document-sxml-snippet commit mset))) diff --git a/tissue/file-document.scm b/tissue/file-document.scm index 72d83a2..b910131 100644 --- a/tissue/file-document.scm +++ b/tissue/file-document.scm @@ -124,8 +124,10 @@ a list of search results." (class "search-result-title")) ,(document-title document)) (div (@ (class "search-result-metadata")) + (span (@ (class ,(string-append "document-type file-document-type"))) + "document") ,(string-append - (format #f "created ~a by ~a" + (format #f " created ~a by ~a" (human-date-string (file-document-created-date document)) (file-document-creator document)) (if (> (length (file-document-commits document)) diff --git a/tissue/issue.scm b/tissue/issue.scm index 5868120..469b033 100644 --- a/tissue/issue.scm +++ b/tissue/issue.scm @@ -215,8 +215,15 @@ object representing a list of search results." ,tag)))) (issue-keywords issue))) (div (@ (class "search-result-metadata")) + (span (@ (class ,(string-append "document-type issue-document-type " + (if (issue-open? issue) + "open-issue-document-type" + "closed-issue-document-type")))) + ,(if (issue-open? issue) + "issue" + "✓ issue")) ,(string-append - (format #f "opened ~a by ~a" + (format #f " opened ~a by ~a" (human-date-string (file-document-created-date issue)) (file-document-creator issue)) (if (> (length (file-document-commits issue)) diff --git a/tissue/web/server.scm b/tissue/web/server.scm index c183edf..25ece4b 100644 --- a/tissue/web/server.scm +++ b/tissue/web/server.scm @@ -79,24 +79,15 @@ form { text-align: center; } text-decoration: none; font-size: larger; } -.search-result-title, .search-result-title:before { vertical-align: middle; } -.search-result-commit .search-result-metadata:before, -.search-result-document .search-result-metadata:before, -.search-result-issue .search-result-metadata:before { +.document-type { font-size: xx-small; font-weight: bold; - margin: 0 0.2em; - padding: 0 0.4em; + padding: 0 0.2em; background-color: darkmagenta; color: white; + text-transform: uppercase; } -.search-result-commit .search-result-metadata:before { content: \"COMMIT\"; } -.search-result-document .search-result-metadata:before { content: \"DOC\"; } -.search-result-open-issue .search-result-metadata:before { - content: \"ISSUE\"; - background-color: green; -} -.search-result-closed-issue .search-result-metadata:before { content: \"✓ ISSUE\"; } +.open-issue-document-type { background-color: green; } .search-result-metadata { color: dimgray; font-size: smaller; |