I guess (interactive "P") should be (interactive) only, and (org-todo-list
0) should be replaced by something like (org-todo-list "TODO") since 4.70.

I really do need to learn better lisp, and, yes, my org-mode is quite out of date. Thanks for the tips! C.