[Emacs] Support/use emacs 29
This commit is contained in:
parent
9651dbbb0f
commit
b8f8787400
@ -931,7 +931,8 @@ This was stolen from https://github.com/jwiegley/dot-emacs
|
|||||||
#+BEGIN_SRC emacs-lisp
|
#+BEGIN_SRC emacs-lisp
|
||||||
(cl-defmacro imalison:disable-mode-hook (mode-name &optional (disable-value -1))
|
(cl-defmacro imalison:disable-mode-hook (mode-name &optional (disable-value -1))
|
||||||
`(defun ,(imalison:concat-symbols 'imalison:disable- mode-name) ()
|
`(defun ,(imalison:concat-symbols 'imalison:disable- mode-name) ()
|
||||||
(,mode-name ,disable-value)))
|
(when (fboundp ',mode-name)
|
||||||
|
(,mode-name ,disable-value))))
|
||||||
|
|
||||||
(imalison:disable-mode-hook linum-mode)
|
(imalison:disable-mode-hook linum-mode)
|
||||||
(imalison:disable-mode-hook nlinum-mode)
|
(imalison:disable-mode-hook nlinum-mode)
|
||||||
@ -1105,6 +1106,8 @@ out how to detect that a buffer is a man mode buffer.
|
|||||||
(setq large-file-warning-threshold (* 25 1024 1024))
|
(setq large-file-warning-threshold (* 25 1024 1024))
|
||||||
(setq line-move-visual t)
|
(setq line-move-visual t)
|
||||||
(setq require-final-newline t)
|
(setq require-final-newline t)
|
||||||
|
(when (fboundp 'pixel-scroll-mode)
|
||||||
|
(pixel-scroll-mode 1))
|
||||||
#+END_SRC
|
#+END_SRC
|
||||||
[[(ad-redefinition-action)][This]] is set because [[(y-or-n-p-only)][this alias]] causes annoying messaging at startup.
|
[[(ad-redefinition-action)][This]] is set because [[(y-or-n-p-only)][this alias]] causes annoying messaging at startup.
|
||||||
** System Clipboard
|
** System Clipboard
|
||||||
@ -1753,6 +1756,11 @@ bind-key and global-set-key forms.
|
|||||||
(setq mac-option-modifier 'meta)
|
(setq mac-option-modifier 'meta)
|
||||||
(setq mac-command-modifier 'super))
|
(setq mac-command-modifier 'super))
|
||||||
#+END_SRC
|
#+END_SRC
|
||||||
|
** xref
|
||||||
|
#+begin_src emacs-lisp
|
||||||
|
(use-package xref
|
||||||
|
:bind ("M-," . xref-go-back))
|
||||||
|
#+end_src
|
||||||
* Navigation
|
* Navigation
|
||||||
** zop-to-char
|
** zop-to-char
|
||||||
#+BEGIN_SRC emacs-lisp
|
#+BEGIN_SRC emacs-lisp
|
||||||
@ -2391,8 +2399,7 @@ reference to the jedi-core package.
|
|||||||
(use-package go-guru
|
(use-package go-guru
|
||||||
:demand t
|
:demand t
|
||||||
:bind (:map go-mode-map
|
:bind (:map go-mode-map
|
||||||
("M-." . go-guru-definition)
|
("M-." . go-guru-definition))
|
||||||
("M-," . pop-tag-mark))
|
|
||||||
:preface
|
:preface
|
||||||
(progn
|
(progn
|
||||||
(defun imalison:set-go-guru-scope ()
|
(defun imalison:set-go-guru-scope ()
|
||||||
@ -2956,8 +2963,7 @@ Intero seems to be causing hangs, so it has been disabled
|
|||||||
("C-c g r" . ggtags-find-reference)
|
("C-c g r" . ggtags-find-reference)
|
||||||
("C-c g f" . ggtags-find-file)
|
("C-c g f" . ggtags-find-file)
|
||||||
("C-c g c" . ggtags-create-tags)
|
("C-c g c" . ggtags-create-tags)
|
||||||
("C-c g u" . ggtags-update-tags)
|
("C-c g u" . ggtags-update-tags)))
|
||||||
("M-," . pop-tag-mark)))
|
|
||||||
(add-hook 'c-mode-common-hook 'imalison:cc-mode-hook)))
|
(add-hook 'c-mode-common-hook 'imalison:cc-mode-hook)))
|
||||||
#+END_SRC
|
#+END_SRC
|
||||||
*** C--
|
*** C--
|
||||||
@ -3757,6 +3763,7 @@ alphanumeric characters only."
|
|||||||
**** auctex-latexmk
|
**** auctex-latexmk
|
||||||
#+BEGIN_SRC emacs-lisp
|
#+BEGIN_SRC emacs-lisp
|
||||||
(use-package auctex-latexmk
|
(use-package auctex-latexmk
|
||||||
|
:disabled t
|
||||||
:config
|
:config
|
||||||
(progn
|
(progn
|
||||||
(setq auctex-latexmk-inherit-TeX-PDF-mode t)
|
(setq auctex-latexmk-inherit-TeX-PDF-mode t)
|
||||||
|
@ -1,6 +1,5 @@
|
|||||||
;; -*- no-byte-compile: t -*-
|
;; -*- no-byte-compile: t -*-
|
||||||
|
|
||||||
|
|
||||||
(let ((bootstrap-file (concat user-emacs-directory "straight/bootstrap.el"))
|
(let ((bootstrap-file (concat user-emacs-directory "straight/bootstrap.el"))
|
||||||
(bootstrap-version 2))
|
(bootstrap-version 2))
|
||||||
(unless (file-exists-p bootstrap-file)
|
(unless (file-exists-p bootstrap-file)
|
||||||
@ -12,6 +11,8 @@
|
|||||||
(eval-print-last-sexp)))
|
(eval-print-last-sexp)))
|
||||||
(load bootstrap-file nil 'nomessage))
|
(load bootstrap-file nil 'nomessage))
|
||||||
|
|
||||||
|
(setq native-comp-deferred-compilation-deny-list nil)
|
||||||
|
|
||||||
;; This is a workaround for an issue in emacs28 with symlinks. See https://github.com/radian-software/straight.el/issues/701
|
;; This is a workaround for an issue in emacs28 with symlinks. See https://github.com/radian-software/straight.el/issues/701
|
||||||
(defun my-patch-package-find-file-visit-truename (oldfun &rest r)
|
(defun my-patch-package-find-file-visit-truename (oldfun &rest r)
|
||||||
(let ((find-file-visit-truename nil))
|
(let ((find-file-visit-truename nil))
|
||||||
|
@ -18,15 +18,16 @@ in
|
|||||||
nixpkgs.overlays = [
|
nixpkgs.overlays = [
|
||||||
(import ../dotfiles/config/xmonad/overlay.nix)
|
(import ../dotfiles/config/xmonad/overlay.nix)
|
||||||
];
|
];
|
||||||
|
|
||||||
nixpkgs.config.allowBroken = true;
|
nixpkgs.config.allowBroken = true;
|
||||||
programs.hyprland.enable = true;
|
programs.hyprland.enable = true;
|
||||||
environment.systemPackages = with pkgs; [
|
environment.systemPackages = with pkgs; [
|
||||||
python-with-my-packages
|
python-with-my-packages
|
||||||
|
|
||||||
alacritty
|
alacritty
|
||||||
(emacs.pkgs.withPackages (epkgs: with epkgs.melpaPackages; [
|
(emacs29.override {
|
||||||
vterm
|
withNativeCompilation = true;
|
||||||
]))
|
withTreeSitter = true;
|
||||||
|
})
|
||||||
vscode
|
vscode
|
||||||
firefox
|
firefox
|
||||||
kitty
|
kitty
|
||||||
|
Loading…
Reference in New Issue
Block a user