Not sure. }:)

evil-leap.el

@@ -29,8 +29,8 @@
 
 (defcustom evil-leap-safe-labels
   (string-to-list "sfnut/SFNLHMUGTZ?")
-  "TODO A list of characters that you will never use immediately after an evil-leap
-jump."
+  "TODO A list of characters that you will never use immediately after an
+evil-leap jump."
   :group 'evil-leap
   :type "List of characters")
 
@@ -391,8 +391,6 @@ corresponding to each occurence of P."
   "TODO Something something something.
 
 Keyword arguments
-  :no-overlays BOOL     Non-nil if labels shall not be visually marked with
-                        overlays.
   :targets     TARGETS  A list of targets, or a Lisp procedure returning such a
                         list."
   (unwind-protect
@@ -405,12 +403,12 @@ Keyword arguments
 
 ;; REVIEW: Could we the preview/branch functionality be rewriten in terms of
 ;; higher-level functions?  Preferably ones included in the public API?
-;;;###autoload
+;;;###autoload (autoload 'evil-leap-directional "evil-leap" nil t)
 (evil-define-motion evil-leap-directional (count backward-p)
   "TODO"
   :jump t
   :type 'exclusive
-  (interactive)
+  (interactive "<c>")
   ;; FIXME: If the search pattern finds zero targets, `labeled-targets' ends up
   ;; being nil, which leads to an error in `evil-leap--select-from-labeled-targets'.
   (unwind-protect
@@ -427,20 +425,26 @@ Keyword arguments
     (evil-leap--remove-all-labels))
   (evil-leap--remove-all-labels))
 
-;;;###autoload
+;;;###autoload (autoload 'evil-leap-forward "evil-leap" nil t)
 (evil-define-motion evil-leap-forward (count)
   "TODO"
   :jump t
   :type 'exclusive
+  (interactive "<c>")
   (evil-leap-directional count nil))
 
-;;;###autoload
+;;;###autoload (autoload 'evil-leap-backward "evil-leap" nil t)
 (evil-define-motion evil-leap-backward (count)
   "TODO"
   :jump t
   :type 'exclusive
+  (interactive "<c>")
   (evil-leap-directional count t))
 
+;; (map!
+;;  :mn "s" #'evil-leap-forward
+;;  :mn "S" #'evil-leap-backward)
+
 
 
 (provide 'evil-leap)