```
(cl-letf (((symbol-function 'org-read-date) (lambda (&rest _) "<2023-08-12 Fri>")))
(org-read-date))
```

So... This is how you stub a function in lisp. Mind blown.