...snip...

> +                                           (t (error "Wrong type argument: 
> string or cons cell, %s" test))))
>                   (let (found)
>                     (while (and (not found)
>                                 (re-search-forward tag nil t))
>                       (if (re-search-forward from (line-end-position) t)
>                           (setq found t)))
> -                   (and found (match-string 0))))))))
> +                   (and found (list (match-string 0) (cond
> +                                                      ((and (listp to)
> +                                                            (fboundp (car 
> to)) (funcall (car to) (cdr to) 0)))
> +                                                      ((string-match-p 
> "\\\\[&[:digit:]]" to)
> +                                                       
> (match-substitute-replacement to nil nil))
> +                                                      ((stringp to) to)
> +                                                      (t (error "Wrong type 
> argument: string or cons cell, %s" test)))))))))))
>        (delete-overlay overlay))))
>  
>  (defun emms-tag-editor-transpose-tag (tag1 tag2)

What does the variable `test' refer to?

-- 
   "Cut your own wood and it will warm you twice"

_______________________________________________
Emms-help mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/emms-help

Reply via email to