(Emacs|SXHkD)~Some small fixes
This commit is contained in:
@@ -33,7 +33,7 @@ code:
|
|||||||
;; and when the configuration is compiled again.
|
;; and when the configuration is compiled again.
|
||||||
|
|
||||||
;; To propagate edits from this file to the literate document, call
|
;; To propagate edits from this file to the literate document, call
|
||||||
;; (org-babel-detangle) while in the file.
|
;; (org-babel-detangle).
|
||||||
;;; Code:
|
;;; Code:
|
||||||
#+end_src
|
#+end_src
|
||||||
|
|
||||||
@@ -559,7 +559,9 @@ Setup the evil package, with some opinionated keybindings:
|
|||||||
"M-y" #'yank-pop
|
"M-y" #'yank-pop
|
||||||
"T" nil)
|
"T" nil)
|
||||||
|
|
||||||
(nmmap
|
(general-def
|
||||||
|
:keymaps 'override
|
||||||
|
:states '(normal motion visual)
|
||||||
:infix "T"
|
:infix "T"
|
||||||
"w" #'transpose-words
|
"w" #'transpose-words
|
||||||
"c" #'transpose-chars
|
"c" #'transpose-chars
|
||||||
|
|||||||
@@ -1,4 +1,4 @@
|
|||||||
;;; early-init.el --- My custom early-init.el -*- lexical-binding: t; -*-
|
;;; early-init.el --- What Emacs loads before init.el -*- lexical-binding: t; -*-
|
||||||
|
|
||||||
;; Copyright (C) 2022 Aryadev Chavali
|
;; Copyright (C) 2022 Aryadev Chavali
|
||||||
|
|
||||||
@@ -19,7 +19,7 @@
|
|||||||
|
|
||||||
;;; Commentary:
|
;;; Commentary:
|
||||||
;; Sets up some variables and graphical configuration to make Emacs
|
;; Sets up some variables and graphical configuration to make Emacs
|
||||||
;; less janky looking while loading
|
;; less janky looking while loading.
|
||||||
;;; Code:
|
;;; Code:
|
||||||
|
|
||||||
(setq gc-cons-threshold most-positive-fixnum
|
(setq gc-cons-threshold most-positive-fixnum
|
||||||
@@ -31,6 +31,10 @@
|
|||||||
native-comp-always-compile nil
|
native-comp-always-compile nil
|
||||||
native-comp-async-report-warnings-errors 'silent)
|
native-comp-async-report-warnings-errors 'silent)
|
||||||
|
|
||||||
|
;; don't use x resources lol
|
||||||
|
(advice-add #'x-apply-session-resources :override #'ignore)
|
||||||
|
;; turn off the menu bar, tool bar, scroll bar, fringes
|
||||||
|
;; also set the transparency (active inactive)
|
||||||
(setq-default
|
(setq-default
|
||||||
default-frame-alist '((menu-bar-lines . 0)
|
default-frame-alist '((menu-bar-lines . 0)
|
||||||
(tool-bar-lines . 0)
|
(tool-bar-lines . 0)
|
||||||
@@ -39,5 +43,3 @@
|
|||||||
(right-fringe . 0)
|
(right-fringe . 0)
|
||||||
(alpha . (90 80))))
|
(alpha . (90 80))))
|
||||||
(scroll-bar-mode -1)
|
(scroll-bar-mode -1)
|
||||||
|
|
||||||
(advice-add #'x-apply-session-resources :override #'ignore)
|
|
||||||
|
|||||||
@@ -24,7 +24,6 @@
|
|||||||
;; Before doing anything else, make gc-cons-threshold ridiculously
|
;; Before doing anything else, make gc-cons-threshold ridiculously
|
||||||
;; high. This makes it so we have as few pauses during init as
|
;; high. This makes it so we have as few pauses during init as
|
||||||
;; possible.
|
;; possible.
|
||||||
(let ((gc-cons-threshold most-positive-fixnum))
|
|
||||||
;; Straight
|
;; Straight
|
||||||
(setq straight-disable-native-compile nil
|
(setq straight-disable-native-compile nil
|
||||||
straight-use-package-by-default nil
|
straight-use-package-by-default nil
|
||||||
@@ -80,14 +79,14 @@
|
|||||||
(require 'notmuch)
|
(require 'notmuch)
|
||||||
(require 'company)
|
(require 'company)
|
||||||
(require 'org)
|
(require 'org)
|
||||||
(require 'eglot)))
|
(require 'eglot))
|
||||||
|
|
||||||
(setq gc-cons-threshold (* 100 1024 1024) ; ~100MiB
|
(setq gc-cons-threshold (* 100 1024 1024) ; ~100MiB
|
||||||
read-process-output-max 5242880 ; ~5MiB
|
read-process-output-max (* 5 1024 1024) ; ~5MiB
|
||||||
;; FIXME: Problem with memory-report after running Emacs for a
|
;; FIXME: Problem with memory-report after running Emacs for a
|
||||||
;; bit, causes a Lisp nesting error, so I just set it up really
|
;; bit, causes a Lisp nesting error, so I just set it up really
|
||||||
;; high so it doesn't reach that.
|
;; high so it doesn't reach that.
|
||||||
max-lisp-eval-depth 5000)
|
max-lisp-eval-depth 999999)
|
||||||
|
|
||||||
(provide 'init)
|
(provide 'init)
|
||||||
;;; init.el ends here
|
;;; init.el ends here
|
||||||
|
|||||||
@@ -15,7 +15,7 @@ super + a
|
|||||||
dmenu_run
|
dmenu_run
|
||||||
|
|
||||||
super + e
|
super + e
|
||||||
emacsclient --eval '(emacs-everywhere)';
|
$HOME/.local/scripts/emoticons
|
||||||
|
|
||||||
super + s
|
super + s
|
||||||
notify-send -u low "Launching browser"; \
|
notify-send -u low "Launching browser"; \
|
||||||
|
|||||||
Reference in New Issue
Block a user