Function: erc--solo

erc--solo is a byte-compiled function defined in erc-common.el.gz.

Signature

(erc--solo LIST-OR-ATOM)

Documentation

If LIST-OR-ATOM is a list of one element, return that element.

Otherwise, return LIST-OR-ATOM.

Source Code

;; Defined in /usr/src/emacs/lisp/erc/erc-common.el.gz
(define-inline erc--solo (list-or-atom)
  "If LIST-OR-ATOM is a list of one element, return that element.
Otherwise, return LIST-OR-ATOM."
  (inline-letevals (list-or-atom)
    (inline-quote
     (if (and (consp ,list-or-atom) (null (cdr ,list-or-atom)))
         (car ,list-or-atom)
       ,list-or-atom))))