From d2dd38386bafe45cff23f01d73b8869668ac9e04 Mon Sep 17 00:00:00 2001
From: Maciej Szlosarczyk <maciej@sosek.net>
Date: Thu, 10 Dec 2020 11:54:52 +0200
Subject: [PATCH] Update themes to dark and enable some minor speed hacks for
 long lines

---
 pkg/base.el                     | 4 ++++
 pkg/lsp.el                      | 1 +
 snippets/elixir-mode/screenshot | 5 +++++
 themes/themes.el                | 5 +++--
 4 files changed, 13 insertions(+), 2 deletions(-)
 create mode 100644 snippets/elixir-mode/screenshot

diff --git a/pkg/base.el b/pkg/base.el
index 2d346da..eeb2ae2 100644
--- a/pkg/base.el
+++ b/pkg/base.el
@@ -160,6 +160,10 @@
   :defer t
   :ensure t)
 
+;;;;;;;;;;;;;;;;; Speed up long line display by disabling bidirectional text
+(setq-default bidi-paragraph-direction 'left-to-right
+              bidi-inhibit-bpa t)
+
 (which-key-mode t)
 
 (provide 'pkg/base)
diff --git a/pkg/lsp.el b/pkg/lsp.el
index eb9cb30..222578e 100644
--- a/pkg/lsp.el
+++ b/pkg/lsp.el
@@ -25,6 +25,7 @@
 
 (setq lsp-ui-doc-enable t
       lsp-ui-header t
+      lsp-ui-delay 0.5 ;; Wait half a second to display documentation
       lsp-ui-doc-position 'at-point
       lsp-ui-doc-include-signature t
       lsp-log-io nil)
diff --git a/snippets/elixir-mode/screenshot b/snippets/elixir-mode/screenshot
new file mode 100644
index 0000000..af621df
--- /dev/null
+++ b/snippets/elixir-mode/screenshot
@@ -0,0 +1,5 @@
+# -*- mode: snippet -*-
+# name: sshot
+# key: sshot
+# --
+Hound.Helpers.Screenshot.take_screenshot()
diff --git a/themes/themes.el b/themes/themes.el
index 9777efe..3ddb183 100644
--- a/themes/themes.el
+++ b/themes/themes.el
@@ -20,6 +20,7 @@
 ;; Light themes
 (load-theme 'base16-atelier-forest-light t t)
 (load-theme 'base16-harmonic-light t t)
+(load-theme 'base16-gruvbox-dark-hard t t)
 
 ;; Dark themes
 (load-theme 'base16-solarflare t t)
@@ -29,8 +30,8 @@
     (progn
       (sml/apply-theme 'respectful)
       (enable-theme (nth
-                     (random 2)
-                     '(base16-snazzy base16-solarflare))))
+                     (random 3)
+                     '(base16-snazzy base16-gruvbox-dark-hard base16-solarflare))))
   (progn
     (defvar base16-theme-256-color-source "base16-shell")
     (enable-theme 'base16-atelier-forest-light)))