Add check that view-mode is enabled for result buffers
This commit is contained in:
parent
91876a5f9d
commit
ef8edc9972
1 changed files with 3 additions and 1 deletions
|
@ -127,12 +127,14 @@ https://www.example.com"))
|
||||||
(expect #'kagi--fastgpt-display-result :not :to-have-been-called)
|
(expect #'kagi--fastgpt-display-result :not :to-have-been-called)
|
||||||
(expect #'font-lock-default-fontify-region :not :to-have-been-called))
|
(expect #'font-lock-default-fontify-region :not :to-have-been-called))
|
||||||
(it "shows longer output with formatting in a separate buffer when called interactively"
|
(it "shows longer output with formatting in a separate buffer when called interactively"
|
||||||
|
(spy-on #'view-mode)
|
||||||
(spy-on #'kagi--call-api :and-return-value (kagi-test--dummy-output (format "%s\n%s" dummy-output dummy-output)))
|
(spy-on #'kagi--call-api :and-return-value (kagi-test--dummy-output (format "%s\n%s" dummy-output dummy-output)))
|
||||||
(kagi-fastgpt-prompt "foo" nil t)
|
(kagi-fastgpt-prompt "foo" nil t)
|
||||||
(expect #'message :not :to-have-been-called)
|
(expect #'message :not :to-have-been-called)
|
||||||
(expect #'kagi--fastgpt-display-result :to-have-been-called)
|
(expect #'kagi--fastgpt-display-result :to-have-been-called)
|
||||||
(kagi-test--expect-arg #'font-lock-default-function 0 :to-equal #'markdown-mode)
|
(kagi-test--expect-arg #'font-lock-default-function 0 :to-equal #'markdown-mode)
|
||||||
(expect #'font-lock-default-fontify-region :to-have-been-called))
|
(expect #'font-lock-default-fontify-region :to-have-been-called)
|
||||||
|
(expect #'view-mode :to-have-been-called))
|
||||||
(it "makes exactly one API call"
|
(it "makes exactly one API call"
|
||||||
(kagi-fastgpt-prompt "foo")
|
(kagi-fastgpt-prompt "foo")
|
||||||
(expect #'kagi--call-api :to-have-been-called-times 1))
|
(expect #'kagi--call-api :to-have-been-called-times 1))
|
||||||
|
|
Loading…
Reference in a new issue