leafac / css-expr Goto Github PK

I'd love to see a predicate that checks whether an arbitrary Racket value is a valid css-expr (that is, a value returned from css-expr). I'd like to use such a thing in contracts. Perhaps there's already such functionality and I'm overlooking it; but if not, I'd love to see that. Thanks for making such a great package!

I'd love to see a function in css-expr that merges two css-exprs (which, I understand, are essentially arbitrary S-expressions). What I have in mind is the problem of making a single chunk of CSS that combines two (or more) chunks of CSS. It would be something like this:

;; in one place:
(define style-1 (css-expr (body max-width 650px)))

;; somewhere else
(define style-2 (css-expr (p line-height 1.2)))

;; merge these:
(define final-style (merge-css-exprs style-1 style-2)

;; would be equivalent to (css-expr (body max-width 650px) (p line-height 1.2))