Function: hfy-box-to-style

hfy-box-to-style is a byte-compiled function defined in htmlfontify.el.gz.

Signature

(hfy-box-to-style SPEC)

Source Code

;; Defined in /usr/src/emacs/lisp/htmlfontify.el.gz
(defun hfy-box-to-style (spec)
  (let* ((css (hfy-box-to-border-assoc  spec))
         (col (cdr      (assoc "color" css)))
         (s   (cdr      (assoc "style"  css))))
    (list
     (if col (cons "border-color" (cdr (assoc "color" css))))
     (cons "border-width" (format "%dpx" (or (cdr (assoc "width" css)) 1)))
     (cons "border-style" (cl-case s
                            (released-button "outset")
                            (pressed-button  "inset" )
                            (t               "solid" ))))))