             ;; stick to that.
 
             (add-hook 'shell-mode-hook
-                      (lambda ()
-                        (setq-local completion-in-region-function
-                                    #'completion--in-region)))))
+                      #'(lambda ()
+                          (setq-local completion-in-region-function
+                                      #'completion--in-region)))))
 
 (use-package db-eshell
   :commands (db/run-or-hide-eshell

                org-clock-auto-clock-resolution 'when-no-clock-is-running
                org-clock-mode-line-total 'auto
                org-clock-report-include-clocking-task t
                org-clock-in-switch-to-state (lambda (_)
                                               (when (not
                                                      (and (boundp 'org-capture-mode)
                                                           org-capture-mode))
                                                 (cond
                                                  ((member (org-get-todo-state)
                                                           (list "TODO" "READ"))
                                                   "CONT")
                                                  ((member (org-get-todo-state)
                                                           (list "GOTO"))
                                                   "ATTN"))))
                org-clock-persist t
                org-clock-persist-query-resume nil
                org-time-stamp-rounding-minutes '(1 1))

              ediff-show-clashes-only t)
  :config (progn
            (add-hook 'ediff-keymap-setup-hook
                      #'(lambda ()
                          (bind-key "j" #'ediff-next-difference ediff-mode-map)
                          (bind-key "k" #'ediff-previous-difference ediff-mode-map)))

            (add-hook 'ediff-after-quit-hook-internal 'winner-undo)))

