Click to toggle on moble, remove clickable projects

This commit is contained in:
Ian Keane 2026-08-26 17:37:52 -04:00
parent e4a124dfe0
commit 537e279780
3 changed files with 20 additions and 18 deletions

View file

@ -18,20 +18,18 @@
;; ─── Individual cards (all become flat children of .columns) ──────────────────
;; Project card — optionally wraps in an anchor if url is set
;; Project card — detail bullets revealed on hover (desktop) or click (mobile)
(define (render-project proj)
(let* ((url (field proj 'url))
(card `(div (@ (class ,(string-append "project-card" (if url " clickable" "")))
,@(if url `((onclick ,(string-append "window.open('" url "','_blank')"))) '()))
(div (@ (class "project-header"))
(span (@ (class "project-name")) ,(field proj 'name))
,(date-range (field proj 'date-start) (field proj 'date-end)))
(div (@ (class "project-summary"))
,(bullets (field proj 'summary-bullets)))
(div (@ (class "project-details"))
,(bullets (field proj 'detail-bullets)))
,(tech-list (field proj 'technologies)))))
card))
`(div (@ (class "project-card")
(onclick "this.classList.toggle('open')"))
(div (@ (class "project-header"))
(span (@ (class "project-name")) ,(field proj 'name))
,(date-range (field proj 'date-start) (field proj 'date-end)))
(div (@ (class "project-summary"))
,(bullets (field proj 'summary-bullets)))
(div (@ (class "project-details"))
,(bullets (field proj 'detail-bullets)))
,(tech-list (field proj 'technologies))))
;; Title card: blurb only, no projects nested inside.
;; Projects are emitted as siblings after the title card.
@ -52,7 +50,8 @@
(map render-project (field tc 'projects))))
(define (render-education edu)
`(div (@ (class "education-card"))
`(div (@ (class "education-card")
(onclick "this.classList.toggle('open')"))
(div (@ (class "edu-header"))
(span (@ (class "edu-degree")) ,(field edu 'degree))
,(date-range (field edu 'date-start) (field edu 'date-end)))