summaryrefslogtreecommitdiff
path: root/tests/test-restclient-config-skyfi-buffer.el
diff options
context:
space:
mode:
authorCraig Jennings <c@cjennings.net>2026-02-18 23:20:28 -0600
committerCraig Jennings <c@cjennings.net>2026-02-18 23:20:28 -0600
commitb19ad7899fecfb6835e19e23a7069233654c9fc7 (patch)
treea8f1747db2a1254d029234a29a45578088305ffc /tests/test-restclient-config-skyfi-buffer.el
parent6bf2688d0b3e4fef82671fb70e1aa883b0c90018 (diff)
feat(restclient): add REST API client for interactive API exploration
restclient.el + restclient-jq integration with SkyFi API templates, tutorial file, auto key injection from authinfo, 17 ERT tests.
Diffstat (limited to 'tests/test-restclient-config-skyfi-buffer.el')
-rw-r--r--tests/test-restclient-config-skyfi-buffer.el38
1 files changed, 38 insertions, 0 deletions
diff --git a/tests/test-restclient-config-skyfi-buffer.el b/tests/test-restclient-config-skyfi-buffer.el
new file mode 100644
index 00000000..7685c77c
--- /dev/null
+++ b/tests/test-restclient-config-skyfi-buffer.el
@@ -0,0 +1,38 @@
+;;; test-restclient-config-skyfi-buffer.el --- Tests for cj/restclient-skyfi-buffer -*- lexical-binding: t; -*-
+
+;;; Commentary:
+;; Unit tests for cj/restclient-skyfi-buffer function.
+;; Opens the SkyFi API template file.
+;; Covers Normal and Error cases.
+
+;;; Code:
+
+(when noninteractive
+ (package-initialize))
+
+(require 'ert)
+(require 'restclient-config)
+
+;;; Normal Cases
+
+(ert-deftest test-restclient-skyfi-buffer-opens-file ()
+ "Opens existing skyfi-api.rest file and switches to it."
+ (let ((skyfi-file (expand-file-name "data/skyfi-api.rest" user-emacs-directory)))
+ (when (file-exists-p skyfi-file)
+ (unwind-protect
+ (progn
+ (cj/restclient-skyfi-buffer)
+ (should (string-match-p "skyfi-api\\.rest"
+ (buffer-file-name (current-buffer)))))
+ (when-let ((buf (get-file-buffer skyfi-file)))
+ (kill-buffer buf))))))
+
+;;; Error Cases
+
+(ert-deftest test-restclient-skyfi-buffer-missing-file-signals-error ()
+ "Signals user-error when skyfi-api.rest does not exist."
+ (let ((cj/restclient-data-dir "/tmp/nonexistent-restclient-test-dir/"))
+ (should-error (cj/restclient-skyfi-buffer) :type 'user-error)))
+
+(provide 'test-restclient-config-skyfi-buffer)
+;;; test-restclient-config-skyfi-buffer.el ends here