.emacs-my
changeset 1704 d5d0c845e7ad
parent 1703 003cda885eeb
child 1705 3ed88879232f
equal deleted inserted replaced
1703:003cda885eeb 1704:d5d0c845e7ad
  3072 (defun my-python/describe-at-point (symbol process)
  3072 (defun my-python/describe-at-point (symbol process)
  3073   "Show full docs for symbol at point."
  3073   "Show full docs for symbol at point."
  3074   (interactive (list (python-info-current-symbol)
  3074   (interactive (list (python-info-current-symbol)
  3075                      (python-shell-get-process)))
  3075                      (python-shell-get-process)))
  3076   (let ( (cmd (concat "help('" symbol "')\n")) )
  3076   (let ( (cmd (concat "help('" symbol "')\n")) )
  3077     (switch-to-buffer (get-buffer-create (format "*Python-doc: %s*" symbol)))
  3077     (switch-to-buffer (get-buffer-create (format "*pydoc: %s*" symbol)))
  3078     (fundamental-mode)
  3078     (fundamental-mode)
  3079     (read-only-mode -1)
  3079     (read-only-mode -1)
  3080     (buffer-disable-undo)
  3080     (buffer-disable-undo)
  3081     (erase-buffer)
  3081     (erase-buffer)
  3082     (insert (python-shell-send-string-no-output cmd process))
  3082     (insert (python-shell-send-string-no-output cmd process))