emacs-ipython-notebook/test/test-ein-pytools.el
dickmao ec28cbe708 revive tkf tests
`make test-unit`
`make test-int` (formerly `cask exec ert-runner`)
An intermittent travis-melpa issue is solved by gonewest818.
2018-09-27 00:52:00 -04:00

28 lines
894 B
EmacsLisp

(require 'ert)
(when load-file-name
(add-to-list 'load-path
(concat (file-name-directory load-file-name) "mocker")))
(require 'mocker)
(require 'ein-pytools)
(require 'ein-testing-kernel)
(ert-deftest ein:pytools-finish-tooltip ()
:expected-result :failed
(ein:testing-kernel-construct-help-string-loop
(lambda (content result)
(if result
(mocker-let
((featurep
(feature)
((:input '(pos-tip) :output t)))
(pos-tip-show
(string &optional tip-color pos window timeout)
((:input (list result 'ein:pos-tip-face nil nil 0)))))
(let ((window-system t))
(ein:pytools-finish-tooltip '-not-used- content '-not-used-)))
(mocker-let
((featurep (feature) ()))
(ein:pytools-finish-tooltip '-not-used- content '-not-used-))))))