Skip to content

Instantly share code, notes, and snippets.

@lislon
Created October 3, 2015 23:29
Show Gist options
  • Select an option

  • Save lislon/067b8541360d699fb1c5 to your computer and use it in GitHub Desktop.

Select an option

Save lislon/067b8541360d699fb1c5 to your computer and use it in GitHub Desktop.
(or (if overriding-terminal-local-map
(FIND-IN overriding-terminal-local-map))
(if overriding-local-map
(FIND-IN overriding-local-map)
(or (FIND-IN (get-char-property (point) 'keymap))
(FIND-IN-ANY emulation-mode-map-alists)
(FIND-IN-ANY minor-mode-overriding-map-alist)
(FIND-IN-ANY minor-mode-map-alist)
(if (get-text-property (point) 'local-map)
(FIND-IN (get-char-property (point) 'local-map))
(FIND-IN (current-local-map)))))
(FIND-IN (current-global-map)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment