This function returns the last path, not the first.
In dolists you can use `return` to fix that:
```lisp
(defun cabbage-phpunit-first-readable-file (&rest paths)
  "Returns the first readable file in the list"
  (dolist (path paths)
    (when (file-readable-p path)
      (return path))))
```