This is really neat, but I'm wondering if you are better off triggering the change by sending SIGUSR1 to the Emacs process [0]. This would remove the need to run the function in a timer every 1s.

[0]:https://www.gnu.org/software/emacs/manual/html_node/elisp/Mi...