emacs: add {early-,}init.el, as exported from init.org
[~bandali/configs] / .emacs.d / init.org
index 4b2d425..42e4def 100644 (file)
@@ -297,6 +297,14 @@ integration, we will define a =use-feature= for plain ole
      ,@args))
 #+end_src
 
+While at it, let's exclude =straight.el='s build from recentf:
+
+#+begin_src emacs-lisp
+(with-eval-after-load 'recentf
+  (add-to-list 'recentf-exclude
+               (expand-file-name "~/.emacs.d/straight/build/")))
+#+end_src
+
 Also, here's a useful function for reloading the init file (useful
 after running =straight-check-all=:
 
@@ -943,6 +951,10 @@ And here's where my actual Org configurations begin:
                  ("\\subparagraph{%s}"  . "\\subparagraph*{%s}"))
                t)
   (require 'ox-beamer))
+
+(use-feature ox-extra
+  :config
+  (ox-extras-activate '(latex-header-blocks ignore-headlines)))
 #+end_src
 
 **** asynchronous tangle
@@ -1076,7 +1088,11 @@ There's no way I could top that, so I won't attempt to.
    ([S-down] . ivy-next-history-element)
    ("DEL"    . ivy-backward-delete-char))
   :config
-  (setq ivy-wrap t)
+  (setq ivy-wrap t
+        ivy-height 14
+        ivy-use-virtual-buffers t
+        ivy-virtual-abbreviate 'abbreviate
+        ivy-count-format "%d/%d ")
   (ivy-mode 1)
   ;; :custom-face
   ;; (ivy-minibuffer-match-face-2 ((t (:background "#e99ce8" :weight semi-bold))))
@@ -1102,9 +1118,9 @@ There's no way I could top that, so I won't attempt to.
   :after ivy
   :bind (([remap execute-extended-command] . counsel-M-x)
          ([remap find-file]                . counsel-find-file)
-         ("s-r"                            . counsel-recentf)
          ("C-c x"                          . counsel-M-x)
          ("C-c f ."                        . counsel-find-file)
+         ("C-c f l"                        . counsel-find-library)
          :map minibuffer-local-map
          ("C-r" . counsel-minibuffer-history))
   :config
@@ -2492,7 +2508,10 @@ this summer.
   :config
   (require 'ebdb)
   (require 'ebdb-mua)
-  (require 'ebdb-gnus))
+  (require 'ebdb-gnus)
+
+  (with-eval-after-load 'recentf
+    (add-to-list 'recentf-exclude gnus-home-directory)))
 
 (use-feature gnus-art
   :config