Function: use-package-normalize-delight

use-package-normalize-delight is a byte-compiled function defined in use-package-delight.el.gz.

Signature

(use-package-normalize-delight NAME ARGS)

Documentation

Normalize ARGS for a single call to delight.

Source Code

;; Defined in /usr/src/emacs/lisp/use-package/use-package-delight.el.gz
(defun use-package-normalize-delight (name args)
  "Normalize ARGS for a single call to `delight'."
  (when (eq :eval (car args))
    ;; Handle likely common mistake.
    (use-package-error ":delight mode line constructs must be quoted"))
  (cond ((and (= (length args) 1)
              (use-package-non-nil-symbolp (car args)))
         `(,(nth 0 args) nil ,name))
        ((= (length args) 2)
         `(,(nth 0 args) ,(nth 1 args) ,name))
        ((= (length args) 3)
         args)
        (t
         (use-package-error
          ":delight expects `delight' arguments or a list of them"))))