         ["Set REPL ns" inf-carp-set-ns t]
         "--"
         ["Show arglist" inf-carp-show-arglist t]
-        ["Show documentation for var" inf-carp-show-var-documentation t]
+        ;;["Show documentation for var" inf-carp-show-var-documentation t]
         ["Show source for var" inf-carp-show-var-source t]
         ["Show vars in ns" inf-carp-show-ns-varst]
         ["Apropos" inf-carp-apropos t]

  :group 'inf-carp)

(defcustom inf-carp-macroexpand-command
  "(carp.core/macroexpand '%s)\n"
  "Command to invoke macroexpand."
  :type 'string
  :group 'inf-carp)

    (define-key map "\M-\C-x"  #'inf-carp-eval-defun)     ; Gnu convention
    (define-key map "\C-x\C-e" #'inf-carp-eval-last-sexp) ; Gnu convention
    (define-key map "\C-c\C-e" #'inf-carp-eval-last-sexp)
    (define-key map "\C-c\C-c" #'inf-carp-build)
    (define-key map (kbd "<s-return>") #'inf-carp-eval-defun)     ; Light Table style
    (define-key map "\C-c\C-k" #'inf-carp-eval-buffer)
    (define-key map "\C-c\C-r" #'inf-carp-eval-region)
    (define-key map "\C-c\C-n" #'inf-carp-eval-form-and-next)
    (define-key map "\C-c\C-z" #'inf-carp-switch-to-repl)
