summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAmin Bandali <amin@gnu.org>2018-08-22 16:33:13 -0400
committerAmin Bandali <amin@gnu.org>2018-08-22 16:33:13 -0400
commit850dd012bd83fb5d89e31695c4e66df4f1684e87 (patch)
tree60ebadd154b9c153b7736ed0804aadf9de97b250
parentc0f95448c2d4b0f22c7cc69dc056c7e24ee29f39 (diff)
downloadconfigs-850dd012bd83fb5d89e31695c4e66df4f1684e87.tar.gz
configs-850dd012bd83fb5d89e31695c4e66df4f1684e87.tar.xz
configs-850dd012bd83fb5d89e31695c4e66df4f1684e87.zip
[emacs] change my conventions prefix from ab to amin
-rw-r--r--init.org51
1 files changed, 25 insertions, 26 deletions
diff --git a/init.org b/init.org
index d7716ba..b47a513 100644
--- a/init.org
+++ b/init.org
@@ -105,20 +105,19 @@ file.
** Naming conventions
-The conventions below were inspired by [[https://github.com/hlissner/doom-emacs][Doom]]'s conventions, found
-[[https://github.com/hlissner/doom-emacs/blob/5dacbb7cb1c6ac246a9ccd15e6c4290def67757c/core/core.el#L3-L17][here]]. Naturally, I use my initials, =ab=, instead of =doom=.
+The conventions below were inspired by [[https://github.com/hlissner/doom-emacs][Doom]]'s, found [[https://github.com/hlissner/doom-emacs/blob/5dacbb7cb1c6ac246a9ccd15e6c4290def67757c/core/core.el#L3-L17][here]].
#+begin_src emacs-lisp :comments none
;; Naming conventions:
;;
-;; ab-... public variables or non-interactive functions
-;; ab--... private anything (non-interactive), not safe for direct use
-;; ab/... an interactive function; safe for M-x or keybinding
-;; ab:... an evil operator, motion, or command
-;; ab|... a hook function
-;; ab*... an advising function
-;; ab@... a hydra command
-;; ...! a macro
+;; amin-... public variables or non-interactive functions
+;; amin--... private anything (non-interactive), not safe for direct use
+;; amin/... an interactive function; safe for M-x or keybinding
+;; amin:... an evil operator, motion, or command
+;; amin|... a hook function
+;; amin*... an advising function
+;; amin@... a hydra command
+;; ...! a macro
#+end_src
* Initial setup
@@ -137,10 +136,10 @@ let's see how long Emacs takes to start up, before even loading
=init.el=, i.e. =user-init-file=:
#+begin_src emacs-lisp
-(defvar ab--before-user-init-time (current-time)
+(defvar amin--before-user-init-time (current-time)
"Value of `current-time' when Emacs begins loading `user-init-file'.")
(message "Loading Emacs...done (%.3fs)"
- (float-time (time-subtract ab--before-user-init-time
+ (float-time (time-subtract amin--before-user-init-time
before-init-time)))
#+end_src
@@ -150,9 +149,9 @@ frequency. Clearing the ~file-name-handler-alist~ seems to help reduce
startup time as well.
#+begin_src emacs-lisp
-(defvar ab--gc-cons-threshold gc-cons-threshold)
-(defvar ab--gc-cons-percentage gc-cons-percentage)
-(defvar ab--file-name-handler-alist file-name-handler-alist)
+(defvar amin--gc-cons-threshold gc-cons-threshold)
+(defvar amin--gc-cons-percentage gc-cons-percentage)
+(defvar amin--file-name-handler-alist file-name-handler-alist)
(setq gc-cons-threshold (* 400 1024 1024) ; 400 MiB
gc-cons-percentage 0.6
file-name-handler-alist nil
@@ -167,9 +166,9 @@ done initializing.
(add-hook
'after-init-hook
(lambda ()
- (setq gc-cons-threshold ab--gc-cons-threshold
- gc-cons-percentage ab--gc-cons-percentage
- file-name-handler-alist ab--file-name-handler-alist)))
+ (setq gc-cons-threshold amin--gc-cons-threshold
+ gc-cons-percentage amin--gc-cons-percentage
+ file-name-handler-alist amin--file-name-handler-alist)))
#+end_src
Increase the number of lines kept in message logs (the =*Messages*=
@@ -397,7 +396,7 @@ Font stack with better unicode support, around =Ubuntu Mono= and
** Useful utilities
#+begin_src emacs-lisp
-(defun ab-enlist (exp)
+(defun amin-enlist (exp)
"Return EXP wrapped in a list, or as-is if already a list."
(if (listp exp) exp (list exp)))
@@ -407,7 +406,7 @@ Font stack with better unicode support, around =Ubuntu Mono= and
compilation."
(declare (indent defun) (debug t))
(list (if (or (not (bound-and-true-p byte-compile-current-file))
- (dolist (next (ab-enlist features))
+ (dolist (next (amin-enlist features))
(if (symbolp next)
(require next nil :no-error)
(load next :no-message :no-error))))
@@ -1187,7 +1186,7 @@ Emacs package that displays available keybindings in popup
See [[notmuch:id:87muuqsvci.fsf@fencepost.gnu.org][bug follow-up]].
#+begin_src emacs-lisp
-(defun ab/notmuch ()
+(defun amin/notmuch ()
"Delete other windows, then launch `notmuch'."
(interactive)
(require 'notmuch)
@@ -1196,13 +1195,13 @@ See [[notmuch:id:87muuqsvci.fsf@fencepost.gnu.org][bug follow-up]].
;; (map!
;; :leader
-;; :desc "notmuch" :n "m" #'ab/notmuch
+;; :desc "notmuch" :n "m" #'amin/notmuch
;; (:desc "search" :prefix "/"
;; :desc "notmuch" :n "m" #'counsel-notmuch))
#+end_src
#+begin_src emacs-lisp
-(defvar ab-maildir "~/mail")
+(defvar amin-maildir "~/mail")
(use-package sendmail
;; :ensure nil
@@ -1242,7 +1241,7 @@ See [[notmuch:id:87muuqsvci.fsf@fencepost.gnu.org][bug follow-up]].
mml-secure-openpgp-sign-with-sender t))
(use-package notmuch
- :ryo ("SPC m" ab/notmuch)
+ :ryo ("SPC m" amin/notmuch)
:config
(setq notmuch-hello-sections
'(notmuch-hello-insert-header
@@ -1342,7 +1341,7 @@ See [[notmuch:id:87muuqsvci.fsf@fencepost.gnu.org][bug follow-up]].
;; (notmuch-tree-mode . emacs))))
(after! recentf
- (add-to-list 'recentf-exclude (expand-file-name ab-maildir)))
+ (add-to-list 'recentf-exclude (expand-file-name amin-maildir)))
#+end_src
** supercite
@@ -1414,7 +1413,7 @@ Display how long it took to load the init file.
#+begin_src emacs-lisp
(message "Loading %s...done (%.3fs)" user-init-file
(float-time (time-subtract (current-time)
- ab--before-user-init-time)))
+ amin--before-user-init-time)))
#+end_src
* Footer