dotfiles/.emacs.d/modules/sqrt-misc-initial.el

26 lines
748 B
EmacsLisp

;;; -*- lexical-binding: t -*-
(setq custom-file (concat user-emacs-directory "custom.el"))
(load custom-file 'noerror)
(setq auth-source-debug nil)
(setq auth-sources '("~/.authinfo.gpg"))
(let ((private-file (expand-file-name "private.el" user-emacs-directory)))
(when (file-exists-p private-file)
(load-file private-file)))
(use-package no-littering
:straight t)
(defun my/run-in-background (command)
(let ((command-parts (split-string command "[ ]+")))
(apply #'call-process `(,(car command-parts) nil 0 nil ,@(cdr command-parts)))))
(defun my/quit-window-and-buffer ()
(interactive)
(quit-window t))
(setq initial-major-mode 'fundamental-mode)
(setq initial-scratch-message "Hallo Leben")
(provide 'sqrt-misc-initial)