diff options
| author | Christopher Baines <mail@cbaines.net> | 2019-09-29 17:12:50 +0100 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2019-09-29 17:12:50 +0100 |
| commit | 48bdb35f3e3d703798d7dabf6f99c90b84f32506 (patch) | |
| tree | 39f5842789a3db747d9dba5f71e892c0100477b5 | |
| parent | e486ba6274c965b6f369dadeb2a8a5f598b56132 (diff) | |
| download | data-service-48bdb35f3e3d703798d7dabf6f99c90b84f32506.tar data-service-48bdb35f3e3d703798d7dabf6f99c90b84f32506.tar.gz | |
Hide deleted branches on the index page
To keep the page length down. All branches can still be seen on the page for
specific repositories.
| -rw-r--r-- | guix-data-service/web/view/html.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/guix-data-service/web/view/html.scm b/guix-data-service/web/view/html.scm index 20a02fc..71f636e 100644 --- a/guix-data-service/web/view/html.scm +++ b/guix-data-service/web/view/html.scm @@ -282,7 +282,9 @@ '(p "No branches") (table/branches-with-most-recent-commits repository-id - branches-with-most-recent-commits)))))) + (filter (lambda (data) + (not (string-null? (second data)))) + branches-with-most-recent-commits))))))) git-repositories-and-revisions))))) (define (view-statistics guix-revisions-count derivations-count) |