From 8ab896846f4526bc35168e973be5e0f40ac66ff0 Mon Sep 17 00:00:00 2001
From: larstvei <larstvei@ifi.uio.no>
Date: Mon, 27 Dec 2021 15:26:08 +0100
Subject: [PATCH] APL

---
 init.org | 11 +++++++++++
 1 file changed, 11 insertions(+)

diff --git a/init.org b/init.org
index 392c303..a7b1125 100644
--- a/init.org
+++ b/init.org
@@ -194,6 +194,7 @@
              expand-region        ; Increase selected region by semantic units
              focus                ; Dim color of text in surrounding sections
              golden-ratio         ; Automatic resizing windows to golden ratio
+             gnu-apl-mode         ; Integrate GNU APL with Emacs
              haskell-mode         ; A Haskell editing mode
              ivy-posframe         ; Using posframe to show Ivy
              jedi                 ; Python auto-completion for Emacs
@@ -1206,6 +1207,16 @@
    (add-hook 'coq-mode-hook #'company-coq-mode)
    #+END_SRC
 
+** APL
+
+   #+begin_src emacs-lisp
+   (with-eval-after-load 'gnu-apl-mode
+     (setq gnu-apl-key-prefix ?`)
+     (gnu-apl--initialize-key-prefix 'gnu-apl-key-prefix ?`)
+     (add-hook 'gnu-apl-mode-hook (lambda () (activate-input-method "APL-Z")))
+     (add-hook 'gnu-apl-interactive-mode-hook (lambda () (activate-input-method "APL-Z"))))
+   #+end_src
+
 * Key bindings
 
   Inspired by [[http://stackoverflow.com/questions/683425/globally-override-key-binding-in-emacs][this StackOverflow post]] I keep a =custom-bindings-map= that