diff options
| author |  Tom Willemsen | 2012-09-16 15:43:01 +0200 |
|---|---|---|
| committer | Tom Willemsen | 2012-09-16 15:43:01 +0200 |
| commit | 7e4d5611c1bbf509f0e234c5daf0eb05f716d961 (patch) | |
| tree | c5b2ed711cbfdcb1d2c5eed292ed36a4579caeeb | |
| parent | d71be13c37beb3d602ba8afcb136be0b14bd14ee (diff) | |
| download | tekuti-7e4d5611c1bbf509f0e234c5daf0eb05f716d961.tar.gz tekuti-7e4d5611c1bbf509f0e234c5daf0eb05f716d961.zip | |
Add some classes to the projects table
These classes should make all the tables look the same, the other way
was messy.
| -rw-r--r-- | tekuti/projects.scm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/tekuti/projects.scm b/tekuti/projects.scm index 5fe29c8..7f68eb6 100644 --- a/tekuti/projects.scm +++ b/tekuti/projects.scm @@ -43,10 +43,10 @@ (define (project->row dir project) (let ((project-dir (string-append dir "/" project))) `(tr - (td ,(gitless project)) - (td ,(project-description project-dir)) - (td ,(git-last-update project-dir)) - (td "")))) + (td (@ (class "span3")) ,(gitless project)) + (td (@ (class "span6")) ,(project-description project-dir)) + (td (@ (class "span2")) ,(git-last-update project-dir)) + (td (@ (class "span1")) "")))) (define (project-list->table top-dir list lvl) (let ((head (car list)) |