suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Rearranging buttons

Browse Source
This commit is contained in:
Jay McCarthy 2012-07-31 13:55:32 -06:00
parent cd0e4b8f8a
commit 27fb60b5a4
1 changed files with 7 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
collects/meta/drdr/render.rkt
View File

@ -98,16 +98,18 @@
,(last string-parts)))
" / "))
(span ([class "revnav"])
(a ([href ,prev-rev-url])
(img ([src "/images/rewind.png"])))
,@(if directory?
empty
`((a ([href ,prev-change-url])
(img ([src "/images/rewind-change.png"])))
(a ([href ,next-change-url])
(img ([src "/images/fast-forward-change.png"])))))
(img ([src "/images/rewind-change.png"])))))
(a ([href ,prev-rev-url])
(img ([src "/images/rewind.png"])))
(a ([href ,next-rev-url])
(img ([src "/images/fast-forward.png"])))
,@(if directory?
empty
`((a ([href ,next-change-url])
(img ([src "/images/fast-forward-change.png"])))))
(a ([href ,cur-rev-url])
(img ([src "/images/skip-forward1.png"])))))))