Some possible keybindings:

;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;; Bookmarks key bindings
;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(when (not tla-bookmarks-mode-map)
  (setq tla-bookmarks-mode-map (make-sparse-keymap))

  ;;; Commands for merging (M)
  (define-key tla-bookmarks-mode-map [?M ?s] 'tla-bookmarks-star-merge)
  (define-key tla-bookmarks-mode-map [?M ?m] 'tla-bookmarks-missing)
  (define-key tla-bookmarks-mode-map [?M ?r] 'tla-bookmarks-replay)


  ;;; Commands for marking (*)
  (define-key tla-bookmarks-mode-map "\M-\C-?" 'tla-bookmarks-unmark-all)
  (define-key tla-bookmarks-mode-map [?* ?!] 'tla-bookmarks-unmark-all)
  (define-key tla-bookmarks-mode-map [?* ?u] 'tla-bookmarks-unmark)
  (define-key tla-bookmarks-mode-map [?* ?m] 'tla-bookmarks-mark)


  ;;; Navigation
  (define-key tla-bookmarks-mode-map [?n] 'tla-bookmarks-next)
  (define-key tla-bookmarks-mode-map [?p] 'tla-bookmarks-previous)


  ;;; Bookmark specific commands
  (define-key tla-bookmarks-mode-map "\C-m" 'tla-bookmarks-goto)
  (define-key tla-bookmarks-mode-map [?a] 'tla-bookmarks-add)
  (define-key tla-bookmarks-mode-map [?e] 'tla-bookmarks-edit)
  (define-key tla-bookmarks-mode-map [?d] 'tla-bookmarks-delete)
  (define-key tla-bookmarks-mode-map [?o] 'tla-bookmarks-open-tree)
  (define-key tla-bookmarks-mode-map [?i] 'tla-bookmarks-inventory)
  (define-key tla-bookmarks-mode-map [?q] 'tla-buffer-quit)
  (define-key tla-bookmarks-mode-map [?+ ?b] 'tla-bookmarks-add)
  (define-key tla-bookmarks-mode-map [?+ ?t] 'tla-bookmarks-add-tree-interactive)
  (define-key tla-bookmarks-mode-map [?- ?t] 'tla-bookmarks-delete-tree-interactive)
  (define-key tla-bookmarks-mode-map [?+ ?p] 'tla-bookmarks-add-partner-interactive)
  (define-key tla-bookmarks-mode-map [?- ?p] 'tla-bookmarks-delete-partner-interactive)
  (define-key tla-bookmarks-mode-map [?+ ?g] 'tla-bookmarks-add-group-interactive)
  (define-key tla-bookmarks-mode-map [?- ?g] 'tla-bookmarks-delete-group-interactive)
  (define-key tla-bookmarks-mode-map [?* ?g] 'tla-bookmarks-select-by-group)
  (define-key tla-bookmarks-mode-map [?N] 'tla-bookmarks-move-down)
  (define-key tla-bookmarks-mode-map [?P] 'tla-bookmarks-move-up)


  ;;; Archive commands (A)
  (define-key tla-bookmarks-mode-map [?>] 'tla-bookmarks-get)
  (define-key tla-bookmarks-mode-map [?A ?g] 'tla-bookmarks-get)


  ;;; Toggle commands (T)
  (define-key tla-bookmarks-mode-map [?T t] 'tla-bookmarks-toggle-details)


  ;;; Debugging commands (D)
  (define-key tla-bookmarks-mode-map [?D p] 'tla-show-process-buffer)
  ;; Add me!
  ;; (define-key tla-bookmarks-mode-map [?D l] 'tla-show-tla-log)


  ;;; Misc
  (define-key tla-bookmarks-mode-map [??] 'describe-mode)
  (define-key tla-bookmarks-mode-map [(meta p)]
    'tla-bookmarks-marked-are-partners)
  )



;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;; Inventory key bindings
;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(when (not tla-inventory-mode-map)
  (setq tla-inventory-mode-map (make-sparse-keymap))

  ;;; Commands for merging (M)
  (define-key tla-inventory-mode-map [?M ?s] 'tla-inventory-star-merge)
  (define-key tla-inventory-mode-map [?M ?r] 'tla-inventory-replay)


  ;;; Commands for marking (*)
  (define-key tla-inventory-mode-map "\M-\C-?" 'tla-inventory-unmark-all)
  (define-key tla-inventory-mode-map [?* ?m] 'tla-inventory-mark-file)
  (define-key tla-inventory-mode-map [?* ?u] 'tla-inventory-unmark-file)
  (define-key tla-inventory-mode-map [?* ?!] 'tla-inventory-unmark-all)


  ;;; Navigation
  (define-key tla-inventory-mode-map [?n] 'tla-inventory-next)
  (define-key tla-inventory-mode-map [?p] 'tla-inventory-previous)
  (define-key tla-inventory-mode-map [?^] 'tla-inventory-parent-directory)
  (define-key tla-inventory-mode-map [left] 'tla-inventory-parent-directory)


  ;;; Inventory specific commands
  (define-key tla-inventory-mode-map [?+ ?f] 'tla-inventory-add)
  (define-key tla-inventory-mode-map [?- ?f] 'tla-inventory-remove)
  (define-key tla-inventory-mode-map [?R] 'tla-inventory-move)
  (define-key tla-inventory-mode-map [?e] 'tla-inventory-file-ediff)
  (define-key tla-inventory-mode-map [?c] 'tla-inventory-edit-log) ;; mnemonic for commit
  (define-key tla-inventory-mode-map [?f] 'tla-inventory-find-file)
  (define-key tla-inventory-mode-map [return] 'tla-inventory-find-file)
  (define-key tla-inventory-mode-map [right] 'tla-inventory-find-file)
  (define-key tla-inventory-mode-map "\C-m" 'tla-inventory-find-file)
  (define-key tla-inventory-mode-map [?o] 'tla-inventory-find-file-other-window)
  (define-key tla-inventory-mode-map [?v] 'tla-inventory-view-file)
  ;;  (define-key tla-inventory-mode-map [?d ?e] 'tla-inventory-file-ediff)
  (define-key tla-inventory-mode-map [?d ?m] 'tla-inventory-missing)
  (define-key tla-inventory-mode-map [?=] 'tla-changes)
  (define-key tla-inventory-mode-map [?l] 'tla-changelog)
  (define-key tla-inventory-mode-map [?L] 'tla-logs)


  ;;; Archive commands (A)
  (define-key tla-inventory-mode-map [?A ?m] 'tla-inventory-mirror)


  ;;; Toggle commands (T)
  (dolist (type-arg tla-inventory-file-types-manipulators)
    (define-key tla-inventory-mode-map `[?T ,(cadddr type-arg)] (caddr type-arg)))
  (define-key tla-inventory-mode-map [?T ?+] 'tla-inventory-set-all-toggle-variables)
  (define-key tla-inventory-mode-map [?T ?-] 'tla-inventory-reset-all-toggle-variables)
  (define-key tla-inventory-mode-map [?T ?~] 'tla-inventory-toggle-all-toggle-variables)

  ;;; Debugging commands (D)
  (define-key tla-inventory-mode-map [?D p] 'tla-show-process-buffer)
  ;; Add me!
  ;; (define-key tla-inventory-mode-map [?D l] 'tla-show-tla-log)

  ;;; Misc
  (define-key tla-inventory-mode-map [??] 'describe-mode)
  (define-key tla-inventory-mode-map [?g] 'tla-generic-refresh)
  (define-key tla-inventory-mode-map [?q] 'tla-buffer-quit)
)



;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;; Revision key bindings
;;;;;;;;;;;;;;;;;;;;;;;;;;;

(when (not tla-revision-list-mode-map)
  (setq tla-revision-list-mode-map (make-sparse-keymap))

  ;;; Commands for merging/branching (M)
  (define-key tla-revision-list-mode-map [?M ?s] 'tla-revision-star-merge)
  (define-key tla-revision-list-mode-map [?M ?t] 'tla-revision-tag)
  (define-key tla-revision-list-mode-map [?M ?r] 'tla-revision-replay)


  ;;; Commands for marking (*)
  (define-key tla-revision-list-mode-map [?* ?m] 'tla-revision-mark-revision)
  ;; Add me!
  ;; (define-key tla-revision-list-mode-map [?* ?u]
  ;;   'tla-revision-unmark-revision)


  ;;; Navigation
  (define-key tla-revision-list-mode-map [?^]
    'tla-revision-list-parent-version)
  (define-key tla-revision-list-mode-map [left]
    'tla-revision-list-parent-version)
  (define-key tla-revision-list-mode-map [down] 'tla-bookmarks-missing-next)
  (define-key tla-revision-list-mode-map [up] 'tla-bookmarks-missing-prev)
  (define-key tla-revision-list-mode-map [?n] 'tla-bookmarks-missing-next)
  (define-key tla-revision-list-mode-map [?p] 'tla-bookmarks-missing-prev)


  ;;; Archive commands (A)
  (define-key tla-revision-list-mode-map [?> ?g] 'tla-revision-get-revision)
  (define-key tla-revision-list-mode-map [?> ?C] 'tla-revision-cache-revision)
  (define-key tla-revision-list-mode-map [?> ?L] 'tla-revision-add-to-library)
  (define-key tla-revision-list-mode-map [?A ?g] 'tla-revision-get-revision)
  (define-key tla-revision-list-mode-map [?A ?c] 'tla-revision-cache-revision)
  (define-key tla-revision-list-mode-map [?A ?l] 'tla-revision-add-to-library)


  ;;; Toggle commands (T)
  (define-key tla-revision-list-mode-map [?T ?d] 'tla-revision-toggle-date)
  (define-key tla-revision-list-mode-map [?T ?c] 'tla-revision-toggle-creator)
  (define-key tla-revision-list-mode-map [?T ?s] 'tla-revision-toggle-summary)
  (define-key tla-revision-list-mode-map [?T ?r] 'tla-revision-toggle-reverse)
  ;; ?t ?? is reserved. Not implemented yet.
  (define-key tla-revision-list-mode-map [?T ??] 'tla-revision-list-toggles)


  ;;; Debugging commands (D)
  (define-key tla-revision-list-mode-map [?D p] 'tla-show-process-buffer)
  ;; Add me!
  ;; (define-key tla-revision-mode-map [?D l] 'tla-show-tla-log)


  ;;; Revision specific commands
  (define-key tla-revision-list-mode-map [?l] 'tla-revision-cat-log)
  (define-key tla-revision-list-mode-map [?u] 'tla-revision-update)
  (define-key tla-revision-list-mode-map "\C-m" 'tla-revision-return)
  (define-key tla-revision-list-mode-map [return] 'tla-revision-return)
  (define-key tla-revision-list-mode-map [right] 'tla-revision-return)
  (define-key tla-revision-list-mode-map [?d] 'tla-revision-delta)
  (define-key tla-revision-list-mode-map [?=] 'tla-revision-changeset)
  (define-key tla-revision-list-mode-map [?i] 'tla-pop-to-inventory)
  (define-key tla-revision-list-mode-map [?.] 'tla-revision-bookmarks-add)


  ;;; Misc
  (define-key tla-revision-list-mode-map [?g] 'tla-generic-refresh)
  (define-key tla-revision-list-mode-map [?q] 'tla-buffer-quit)
)
