Automatically load scheme-mode for scsh files

When the interpreter contains scsh, load ‘scheme-mode’.

oni-scheme.el

@@ -4,7 +4,7 @@
 
 ;; Author: Tom Willemse <tom@ryuslash.org>
 ;; Keywords: local
-;; Version: 2019.1210.231332
+;; Version: 2020.0106.200514
 ;; Package-Requires: (oni-company oni-paredit oni-fci rainbow-delimiters)
 
 ;; This program is free software; you can redistribute it and/or modify
@@ -37,6 +37,7 @@
 (add-hook 'scheme-mode-hook 'rainbow-delimiters-mode)
 (add-hook 'scheme-mode-hook 'oni-scheme--auto-fill-mode)
 
+;;;###autoload
 (add-to-list 'interpreter-mode-alist '("scsh" . scheme-mode))
 
 ;;;###autoload(with-eval-after-load 'scheme (require 'oni-scheme))

test/oni-scheme.bats

@@ -0,0 +1,23 @@
+#!/usr/bin/env bats
+
+@test "Opening a scheme file loads oni-scheme" {
+    run emacs -batch -l package -f package-initialize \
+          -visit test.scm \
+          -eval "(prin1 (featurep 'oni-scheme))"
+
+    [ "$output" = "t" ]
+}
+
+@test "Opening a file with the SCSH interpreter loads scheme-mode" {
+    filename="$(mktemp)"
+
+    echo "#!/usr/bin/scsh -s" > "$filename"
+
+    run emacs -batch -l package -f package-initialize \
+        -visit "$filename" \
+        -eval "(prin1 major-mode)"
+
+    rm "$filename"
+
+    [ "$output" = "scheme-mode" ]
+}