Compare commits

..

No commits in common. "ba82470beaaf787f92495c749683950c42dfa0d0" and "a0b74ef1db8ad24cd7d719fce6bc8c14d90b4174" have entirely different histories.

8 changed files with 33 additions and 33 deletions

View file

@ -15,7 +15,7 @@
;;;;;;;; Stolen from Doom Emacs. ;;;;;;;;;;;;;
;; Update emacs less often
(setopt idle-update-delay 1.0)
(setq idle-update-delay 1.0)
;; Disable bidirectional text rendering for a modest performance boost. I've set
;; this to `nil' in the past, but the `bidi-display-reordering's docs say that
@ -26,16 +26,16 @@
;; Reduce rendering/line scan work for Emacs by not rendering cursors or regions
;; in non-focused windows.
(setq-default cursor-in-non-selected-windows nil)
(setopt highlight-nonselected-windows nil)
(setq highlight-nonselected-windows nil)
;; More performant rapid scrolling over unfontified regions. May cause brief
;; spells of inaccurate syntax highlighting right after scrolling, which should
;; quickly self-correct.
(setopt fast-but-imprecise-scrolling t)
(setq fast-but-imprecise-scrolling t)
;;;;;;;;; TRAMP configuration ;;;;;;;;;;;;;;;;
(require 'tramp)
(setopt tramp-default-method "ssh")
(setq tramp-default-method "ssh")
;;;;;;;;; Emacs bindings ;;;;;;;;;;;;;;;;;;;;;
(global-set-key (kbd "RET") 'newline)
@ -56,19 +56,19 @@
(gcmh-mode t))
;; #====================== Backup config #==============================
(setopt backup-directory-alist
(setq backup-directory-alist
`((".*" . "~/.emacs.d/backups/auto-save-list")))
(setopt auto-save-file-name-transforms
(setq auto-save-file-name-transforms
`((".*", "~/.emacs.d/backups/auto-save-list" t)))
(setopt backup-by-copying t)
(setopt delete-old-versions t
(setq backup-by-copying t)
(setq delete-old-versions t
kept-new-versions 6
kept-old-versions 2
version-control t)
; Do not create .#foo.file lock files
(setopt create-lockfiles nil)
(setq create-lockfiles nil)
;; Enable line numbers and show cursors position
(add-hook 'prog-mode-hook 'display-line-numbers-mode)
@ -78,16 +78,16 @@
(column-number-mode t)
;; Turn off sounds
(setopt ring-bell-function 'ignore)
(setq ring-bell-function 'ignore)
;; Enable y/n answers to questions
(setopt use-short-answers t)
;; Only warn if a file is bigger than 50 MB when trying to open it
(setopt large-file-warning-threshold 50000000)
(setq large-file-warning-threshold 50000000)
;; Numbers are arbitrary, but work on a large screen. Default is 160
(setopt split-width-threshold 200)
(setq split-width-threshold 200)
;;;;;;;;;;;;;;;;;;;;;; Shell stuff ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(add-hook 'shell-mode-hook 'ansi-color-for-comint-mode-on)
@ -110,13 +110,13 @@
(direnv-mode t))
;; Draw underline lower
(setopt x-underline-at-descent-line t)
(setq x-underline-at-descent-line t)
;;; Get rid of bad parts of the windows
(tool-bar-mode -1)
(scroll-bar-mode -1)
(setopt indicate-buffer-boundaries nil
indicate-empty-lines nil)
(setq indicate-buffer-boundaries nil
indicate-empty-lines nil)
;;;;;;;;;;;;;;;;; Treemacs
(use-package treemacs :ensure t

View file

@ -54,7 +54,7 @@
)
;; Absolute defaults for company mode
(setopt company-backends
(setq company-backends
'((company-files ; files & directory
company-keywords ; keywords
company-capf

View file

@ -9,7 +9,7 @@
(require 'icejam-keys-mode)
;; Preparations for using Vertico/Orderless
(setopt
(setq
;; Support opening new minibuffers from inside existing minibuffers.
enable-recursive-minibuffers t
;; Hide commands in M-x which do not work in the current mode. Vertico
@ -17,10 +17,10 @@
;; Vertico.
read-extended-command-predicate #'command-completion-default-include-p
;; Do not allow the cursor in the minibuffer prompt
minibuffer-prompt-properties
'(read-only t cursor-intangible t face minibuffer-prompt))
minibuffer-prompt-properties '(read-only t cursor-intangible t face minibuffer-prompt))
(defun crm-indicator (args)
>>>>>>> use-elpaca
(cons (format "[CRM%s] %s"
(replace-regexp-in-string
"\\`\\[.*?]\\*\\|\\[.*?]\\*\\'" ""

View file

@ -11,11 +11,11 @@
;;; Code:
;; Set GC at 500 MB for startup
(setopt gc-cons-threshold 500000000)
(setopt gc-cons-percentage 0.6)
(setq gc-cons-threshold 500000000)
(setq gc-cons-percentage 0.6)
;; Allow for deeper stacktraces / recursion
;; (setopt max-lisp-eval-depth 10000)
;; (setq max-lisp-eval-depth 10000)
;;; Use elpaca for package management.
(defvar elpaca-installer-version 0.7)
@ -58,8 +58,8 @@
(elpaca `(,@elpaca-order))
;; Use package settings
(setopt use-package-verbose t)
(setopt use-package-compute-statistics t)
(setq use-package-verbose t)
(setq use-package-compute-statistics t)
(elpaca elpaca-use-package
;; Enable use-package :ensure support for Elpaca.
(elpaca-use-package-mode))
@ -135,8 +135,8 @@
(require 'icejam-diminish)
;; Restore GC to normal, but still high
(setopt gc-cons-threshold 200000000)
(setopt gc-cons-percentage 0.2)
(setq gc-cons-threshold 200000000)
(setq gc-cons-percentage 0.2)
(provide 'icejam-custom-init)
;;; icejam-custom-init.el ends here

View file

@ -7,7 +7,7 @@
:custom ((flycheck-emacs-lisp-load-path 'inherit))
:config
(global-flycheck-mode t)
(setopt flycheck-emacs-lisp-load-path 'inherit)
(setq flycheck-emacs-lisp-load-path 'inherit)
(unbind-key "C-c ! C-c" flycheck-mode-map)
(unbind-key "C-c ! C-w" flycheck-mode-map)
(unbind-key "C-c ! ?" flycheck-mode-map)

View file

@ -50,7 +50,7 @@ in icejam-set-font-to-screen.")
(defun icejam-set-lsp-ui-font-hook ()
"Reset LSP IO font to specified icejam-font and icejam-font-size."
(setopt lsp-ui-doc-frame-hook nil)
(setq lsp-ui-doc-frame-hook nil)
(add-hook 'lsp-ui-doc-frame-hook
(lambda (frame _w)
(set-face-attribute
@ -60,8 +60,8 @@ in icejam-set-font-to-screen.")
(defun icejam-set-font (name size)
"Set font to NAME and its SIZE to X pixels."
(interactive "sNew font: \nnEnter size for %s: ")
(setopt icejam-mut-font name)
(setopt icejam-mut-font-size size)
(setq icejam-mut-font name)
(setq icejam-mut-font-size size)
(set-face-attribute 'default nil :font (format "%s %d" name size))

View file

@ -47,8 +47,8 @@
(add-to-list 'dash-at-point-mode-alist '(elixir-ts-mode . "elixir,hex")))
;; By default, use 2 spaces for indentation
(setopt tab-width 2)
(setopt tab-stop-list (number-sequence tab-width 200 tab-width))
(setq tab-width 2)
(setq tab-stop-list (number-sequence tab-width 200 tab-width))
;; Ensure indentation in steps:
(defun icejam-set-indent (step)

View file

@ -54,7 +54,7 @@
;; My own theme modifications:
(with-eval-after-load 'base16-theme
(setopt base16-theme-256-color-source 'colors)
(setq base16-theme-256-color-source "colors")
(require 'icejam-base16-zenburn)
(require 'icejam-base16-harmonic-light)