Function: transient--extract-value

transient--extract-value is a byte-compiled function defined in transient.el.

Signature

(transient--extract-value OBJ)

Source Code

;; Defined in ~/.emacs.d/elpa/transient-20260806.1211/transient.el
(defun transient--extract-value (obj)
  (cond-let*
    ([_(slot-exists-p obj 'argument-regexp)]
     [regexp (oref obj argument-regexp)]
     (lambda (arg)
       (and (stringp arg)
            (let ((case-fold-search nil))
              (string-match regexp arg))
            (match-string 1 arg))))
    ([argument (oref obj argument)]
     (lambda (arg)
       (and (stringp arg)
            (string-prefix-p argument arg)
            (substring arg (length argument)))))))