aliens/tekuti
1
0
Fork 0
Code Activity

Add some classes to the projects table

Browse source 
These classes should make all the tables look the same, the other way
was messy.
This commit is contained in:
Tom Willemsen 2012-09-16 15:43:01 +02:00
parent d71be13c37
commit 7e4d5611c1
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
tekuti/projects.scm
View file

@ -43,10 +43,10 @@
(define (project->row dir project) (define (project->row dir project)
(let ((project-dir (string-append dir "/" project))) (let ((project-dir (string-append dir "/" project)))
`(tr `(tr
(td ,(gitless project)) (td (@ (class "span3")) ,(gitless project))
(td ,(project-description project-dir)) (td (@ (class "span6")) ,(project-description project-dir))
(td ,(git-last-update project-dir)) (td (@ (class "span2")) ,(git-last-update project-dir))
(td "")))) (td (@ (class "span1")) ""))))
(define (project-list->table top-dir list lvl) (define (project-list->table top-dir list lvl)
(let ((head (car list)) (let ((head (car list))