Add navigation functions for end-of-line and beginning-of-line

1 files changed, 28 insertions, 0 deletions

diff --git a/test/integration/oni-core.bats b/test/integration/oni-core.bats
new file mode 100644
index 0000000..7e52d86
--- /dev/null
+++ b/test/integration/oni-core.bats
@@ -0,0 +1,28 @@
+#!/usr/bin/env bats
+
+@test "Opening emacs loads oni-core" {
+    run emacs -batch -l package -f package-initialize \
+        -eval "(prin1 (featurep 'oni-core))"
+
+    echo "$output"
+
+    [[ "$output" == *"t" ]]
+}
+
+@test "C-a is bound to oni-core-move-to-beginning-of-dwim" {
+    run emacs -batch -l package -f package-initialize \
+        -eval "(prin1 (key-binding (kbd \"C-a\")))"
+
+    echo "$output"
+
+    [[ "$output" == *"oni-core-move-beginning-of-dwim" ]]
+}
+
+@test "C-e is bound to oni-core-move-to-end-of-dwim" {
+    run emacs -batch -l package -f package-initialize \
+        -eval "(prin1 (key-binding (kbd \"C-e\")))"
+
+    echo "$output"
+
+    [[ "$output" == *"oni-core-move-end-of-dwim" ]]
+}