+;;;###autoload
+(defun find-function-setup-keys ()
+ "Define some key bindings for the find-function family of functions."
+ (define-key ctl-x-map "F" 'find-function)
+ (define-key ctl-x-4-map "F" 'find-function-other-window)
+ (define-key ctl-x-5-map "F" 'find-function-other-frame)
+ (define-key ctl-x-map "K" 'find-function-on-key)
+ (define-key ctl-x-map "V" 'find-variable)
+ (define-key ctl-x-4-map "V" 'find-variable-other-window)
+ (define-key ctl-x-5-map "V" 'find-variable-other-frame))
+