projects
/
~bandali
/
configs
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
user-dirs: rename XDG_TEMPLATES_DIR from temp to tmpl
[~bandali/configs]
/
.emacs.d
/
init.el
diff --git
a/.emacs.d/init.el
b/.emacs.d/init.el
index
0ae6f40
..
251319a
100644
(file)
--- a/
.emacs.d/init.el
+++ b/
.emacs.d/init.el
@@
-99,7
+99,7
@@
\f
;;; whoami
\f
;;; whoami
-(setq
user-full-name "Amin B
andali"
+(setq
;; user-full-name "b
andali"
user-mail-address "bandali@gnu.org")
\f
user-mail-address "bandali@gnu.org")
\f
@@
-220,6
+220,7
@@
This sets each user option VAR's value to the corresponding VALUE.
;;;; C-level customizations
(csetq
;;;; C-level customizations
(csetq
+ ;; line-spacing 3
;; completion case sensitivity
completion-ignore-case t
read-buffer-completion-ignore-case t
;; completion case sensitivity
completion-ignore-case t
read-buffer-completion-ignore-case t
@@
-246,7
+247,11
@@
This sets each user option VAR's value to the corresponding VALUE.
indent-tabs-mode nil
tab-width 4)
indent-tabs-mode nil
tab-width 4)
-(set-fontset-font t 'arabic "Vazir")
+(when (display-graphic-p)
+ (set-fontset-font t 'arabic "Vazir"))
+;; ;; (set-frame-font "Drafting Mono-14:weight=light" nil t)
+;; (set-frame-font "Drafting Mono:pixelsize=16" nil t)
+;; (set-face-attribute 'bold nil :weight 'semi-bold)
;;;; Elisp-level customizations
;;;; Elisp-level customizations
@@
-450,13
+455,17
@@
This sets each user option VAR's value to the corresponding VALUE.
(when (display-graphic-p)
(with-eval-after-load 'faces
(let* ((grey "#e7e7e7")
(when (display-graphic-p)
(with-eval-after-load 'faces
(let* ((grey "#e7e7e7")
- (darker-grey "#d9d9d9")
- (box ;; `(:line-width -1 :style released-button)
- 'unspecified))
+ ;; (darker-grey "#d9d9d9")
+ ;; (box ;; 'unspecified
+ ;; `(;; :line-width -1
+ ;; :style released-button))
+ )
(set-face-attribute 'mode-line nil
(set-face-attribute 'mode-line nil
- :background grey :box box)
- (set-face-attribute 'mode-line-inactive nil
- :background darker-grey :box box))))
+ :background grey ;; :box box
+ )
+ ;; (set-face-attribute 'mode-line-inactive nil
+ ;; :background darker-grey :box box)
+ )))
\f
;;; Useful utilities
\f
;;; Useful utilities
@@
-559,6
+568,7
@@
Make N (default: 1) copies of the current line or region."
(global-set-key (kbd "C-c f .") #'find-file)
(global-set-key (kbd "C-c f d") #'find-name-dired)
(global-set-key (kbd "C-c f l") #'find-library)
(global-set-key (kbd "C-c f .") #'find-file)
(global-set-key (kbd "C-c f d") #'find-name-dired)
(global-set-key (kbd "C-c f l") #'find-library)
+(global-set-key (kbd "C-c f p") #'find-file-at-point)
;; frames
(global-set-key (kbd "C-c F m") #'make-frame-command)
;; frames
(global-set-key (kbd "C-c F m") #'make-frame-command)
@@
-643,9
+653,12
@@
Make N (default: 1) copies of the current line or region."
(csetq shr-max-width 80)
(csetq shr-max-width 80)
-;; Email (with Gnus
and message
)
+;; Email (with Gnus
, message, and smtpmail
)
(require 'bandali-gnus)
(require 'bandali-message)
(require 'bandali-gnus)
(require 'bandali-message)
+;; (with-eval-after-load 'smtpmail
+;; (csetq smtpmail-queue-mail t
+;; smtpmail-queue-dir (concat b/maildir "queue/")))
;; IRC (with ERC)
(require 'bandali-erc)
;; IRC (with ERC)
(require 'bandali-erc)
@@
-966,6
+979,9
@@
Make N (default: 1) copies of the current line or region."
(delight 'mml-mode " mml" "mml")
(delight 'yas-minor-mode "" "yasnippet"))
(delight 'mml-mode " mml" "mml")
(delight 'yas-minor-mode "" "yasnippet"))
+;; po-mode
+(require 'bandali-po)
+
\f
;;; Post initialization
\f
;;; Post initialization