diff options
-rw-r--r-- | tissue/document.scm | 2 | ||||
-rw-r--r-- | tissue/issue.scm | 5 |
2 files changed, 7 insertions, 0 deletions
diff --git a/tissue/document.scm b/tissue/document.scm index 5b572ed..e9bdb65 100644 --- a/tissue/document.scm +++ b/tissue/document.scm @@ -209,6 +209,8 @@ MSet object representing a list of search results." (display (colorize-string (document-title document) 'MAGENTA 'UNDERLINE) port) (newline port) + (display (colorize-string "DOCUMENT" 'BOLD 'YELLOW) port) + (display " " port) (display (colorize-string (file-document-path document) 'YELLOW) port) (newline port) diff --git a/tissue/issue.scm b/tissue/issue.scm index 6f03b36..65dd7a0 100644 --- a/tissue/issue.scm +++ b/tissue/issue.scm @@ -119,6 +119,11 @@ " posts]") port)) (newline port) + (display (if (issue-open? issue) + (colorize-string "ISSUE" 'BOLD 'YELLOW) + (colorize-string "✓ ISSUE" 'BOLD 'GREEN)) + port) + (display " " port) (display (colorize-string (file-document-path issue) 'YELLOW) port) (newline port) |