mirrors/clog
1
Fork 0
mirror of https://github.com/rabbibotton/clog.git synced 2025-12-06 02:30:42 -08:00
Code Issues Projects Releases Wiki Activity

text-shadow

Browse source
This commit is contained in:
David Botton 2021-03-16 21:06:40 -04:00
parent c2ec52d1e2
commit cbf8f4ac58
4 changed files with 23 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

17
source/clog-element.lisp
View file

@ -1889,6 +1889,23 @@ line-width - size or medium|thin|thick|length|initial|inherit"))
(setf (style obj "box-shadow") value))
(defsetf box-shadow set-box-shadow)
;;;;;;;;;;;;;;;;;
;; text-shadow ;;
;;;;;;;;;;;;;s;;;
(defgeneric text-shadow (clog-element)
(:documentation "Get/Setf text-shadow."))
(defmethod text-shadow ((obj clog-element))
(style obj "text-shadow"))
(defgeneric set-text-shadow (clog-element value)
(:documentation "Set text-shadow. See https://developer.mozilla.org/en-US/docs/Web/CSS/CSS_Background_and_Borders/Text-shadow_generator"))
(defmethod set-text-shadow ((obj clog-element) value)
(setf (style obj "text-shadow") value))
(defsetf text-shadow set-text-shadow)
;;;;;;;;;;;;;
;; outline ;;
;;;;;;;;;;;;;