3.8 KiB
git clone https://github.com/plexus/chemacs2.git ~/.emacs.d (%appdata% on windows)
M-x describe-variable RET user-init-file RET
uncomment the package init line in the appropriate init file(s)
cat > ~/.emacs-profiles.el <<EOF (("default" . ((user-emacs-directory . "~/.emacs.d.profiles/code"))) ("code" . ((user-emacs-directory . "~/.emacs.d.profiles/code"))) ("org" . ((user-emacs-directory . "~/.emacs.d.profiles/org"))) ("beancount" . ((user-emacs-directory . "~/.emacs.d.profiles/accounting"))) ("ledger" . ((user-emacs-directory . "~/.emacs.d.profiles/accounting"))) ("accounting" . ((user-emacs-directory . "~/.emacs.d.profiles/accounting"))) ) EOF
; emacs --with-profile my-profile ; emacs --with-profile '((user-emacs-directory . "/path/to/config"))' ; add option to shortcut to runemacs.exe if needed
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
cat > ~/.emacs.d.profiles/[profile]/init.el<<EOF ;; -- lexical-binding: t; -- ;; TURN ON IN INIT FILE!!!!!
;; Make gc pauses faster by decreasing the threshold. (setq gc-cons-threshold (* 2 1000 1000))
(require 'package)
(add-to-list 'package-archives '("melpa" . "https://melpa.org/packages/") t)
;; Comment/uncomment this line to enable MELPA Stable if desired. See package-archive-priorities
;; and package-pinned-packages
. Most users will not need or want to do this.
;;(add-to-list 'package-archives '("melpa-stable" . "https://stable.melpa.org/packages/") t)
(unless (package-installed-p 'use-package)
(package-refresh-contents)
(package-install 'use-package))
(require 'use-package)
EOF
cd [profile_path] git clone https://github.com/beancount/beancount-mode.git
cd [profile_path] git clone https://github.com/mnewt/dired-rainbow-listing
install hunspell + dictionaries choco install hunspell.portable / https://github.com/wooorm/dictionaries
open scratch buffer. paste below into it as the contents then do M-x ev-b RET
; if get failures on pkg command, run contents of init.el from above first
; code
(defvar packages-code '(markdown-mode
rainbow-mode
rainbow-delimiters
lua-mode
dockerfile-mode
yaml-mode
go-mode
rust-mode
powershell
python-mode
json-mode)
"Code packages")
; accounting
(defvar packages-accounting '(
ledger-mode)
"Accounting packages")
(defvar packages-default '(
modus-themes
all-the-icons
persp-mode
diminish
dash
transpose-frame
helm
helm-ls-git
helm-org
projectile
helm-projectile
persp-mode-projectile-bridge
doom-modeline
s
f
oragami
ido-completing-read+
dired-single
all-the-icons-dired
dired-rainbow
helpful)
"Default packages")
(defun kmn-packages-installed-p ()
(cl-loop for p in packages-default
when (not (package-installed-p p)) do (cl-return nil)
finally (cl-return t)))
(unless (kmn-packages-installed-p)
;; check for new packages (package versions)
(message "%s" "Emacs is now refreshing its package database...")
(package-refresh-contents)
(message "%s" " done.")
;; install the missing packages
(dolist (p packages-default)
(when (not (package-installed-p p))
(package-install p))))
speed up runtime by compiling all packages
(require 'dash)
(require 'f)
(defun was-compiled-p (path)
"Does the directory at PATH contain any .elc files?"
(--any-p (f-ext? it "elc") (f-files path)))
(defun ensure-packages-compiled ()
"If any packages installed with package.el aren't compiled yet, compile them."
(--each (f-directories package-user-dir)
(unless (was-compiled-p it)
(byte-recompile-directory it 0))))
(ensure-packages-compiled)