               (dired-next-line 1))
 
             (bind-key [remap beginning-of-buffer]
-                      'dired-back-to-top dired-mode-map)
+                      #'dired-back-to-top dired-mode-map)
 
             (defun dired-jump-to-bottom ()
               "Jump to last non-trivial line in dired."

                                  (setq ediff-after-quit-hook-internal nil)
                                  (set-window-configuration wnd))))
                  (error "No more than 2 files should be marked"))))
            (bind-key "e" 'ora-ediff-files dired-mode-map)

            (defun dired-back-to-top ()
              "Jump to first non-trivial line in dired."


            (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)))

