             (progn
               (modi/minibuffer-line-set-default-face)
               (setq modi/timer--go-home-alert nil)
-              (message "%s: 'Go Home' alert removed." modi/today--day-sym))
+              (message "%s: `Go Home' alert removed." modi/today--day-sym))
           (let ((daily (* 60 60 24))
                 new-go-home-time new-go-home-time-str)
             (setq modi/timer--go-home-alert (run-at-time

      (set-face-attribute 'minibuffer-line nil :inherit font-lock-warning-face))

    (defun modi/update-go-home-alert ()
      "Reset the `minibuffer-line' face to default and update the 'Go Home'
alert time."
      (modi/minibuffer-line-set-default-face)
      (setq modi/today--day-sym (intern (format-time-string "%a")))

                                         modi/time-go-home-alert))))

    (defun modi/reset-go-home-alert (time)
      "Set the `go home' alert reset time interactively.
The `modi/timer--go-home-reset' timer is canceled and not restarted if
TIME is \"nil\" or \"\"."
      (interactive "sReset alert time (e.g. 7:00am): ")
