Combining query replace with projectile

gistfile1.txt

(setq my-projectile-query-replace-files (list "\\.py$" "\\.el$" "\\.c$" "\\.cc$"))


(defun my-projectile-query-replace (from to)
  (interactive
   (let (initial)
     (setq initial (read-string "Replace:"))
     (list initial (read-string "With:" initial))))
  (findr-query-replace from to (s-join "\\|" 'my-projectile-query-replace-files) (projectile-project-root)))
  
  
  (defun my-projectile-query-replace (from to)
  (interactive
   (let (initial)
     (setq initial (read-string "Replace:"))
     (list initial (read-string "With:" initial))))
  (findr-query-replace from to (s-join "\\|" 'my-projectile-query-replace-files) (projectile-project-root)))

I am getting Wrong type argument: sequencep, my-projectile-query-replace-files error