summaryrefslogtreecommitdiff
path: root/emacs/inits/01-basic.el
diff options
context:
space:
mode:
authortslil clingman <tslil@posteo.de>2023-09-12 21:07:47 +0200
committertslil clingman <tslil@posteo.de>2023-09-12 21:08:54 +0200
commit8607fd0b5d3cb9efcd4bd805321128713823271d (patch)
treea8e977963943f56f42388449fc2a334a58f550eb /emacs/inits/01-basic.el
parentf749a8ac8423e11739ff1315d1ff50256f565d95 (diff)
[emacs] misc config updates
Diffstat (limited to 'emacs/inits/01-basic.el')
-rw-r--r--emacs/inits/01-basic.el48
1 files changed, 36 insertions, 12 deletions
diff --git a/emacs/inits/01-basic.el b/emacs/inits/01-basic.el
index fab9724..f1511a3 100644
--- a/emacs/inits/01-basic.el
+++ b/emacs/inits/01-basic.el
@@ -1,4 +1,4 @@
-;; Time-stamp: <2022-05-04 21h32 CDT (hobbies)>
+;; Time-stamp: <2023-08-07 09h15 CEST (anker)>
;; -----------------------------------------------------------------------------
;; Interface
@@ -29,18 +29,42 @@
(enlarge-window-horizontally (- (+ 1 fill-column) ww)))))
(global-set-key (kbd "C-c 3") (lambda ()
- (interactive)
- (split-window-horizontally)
- (enlarge-to-fill)))
+ (interactive)
+ (split-window-horizontally)
+ (enlarge-to-fill)))
(add-to-list 'custom-theme-load-path "~/.emacs.d/themes/")
-(when (eq 'x (window-system))
- (load-theme 'acme t)
- (set-face-attribute 'font-lock-comment-face nil :slant 'italic)
+(use-package circadian
+ :ensure t
+ :config
+ (setq calendar-latitude 52.34
+ calendar-longitude 4.87
+ circadian-themes '(("07:30" . acme)
+ ("15:00" . modus-operandi)
+ (:sunset . nord)))
+ (circadian-setup))
+
+;; (defun my-disable-bold-fonts ()
+;; (interactive)
+;; (mapc
+;; (lambda (face)
+;; (set-face-attribute face nil :weight 'normal))
+;; (face-list)))
+
+;; (my-disable-bold-fonts)
+
+(when 't
+ (setq my-font "PxPlus IBM VGA 9x16-24")
+ (setq my-font "Sudo-22")
+ (setq my-font "Commit Mono-23")
+ (set-face-attribute 'fixed-pitch-serif nil :font my-font)
+ (set-face-attribute 'fixed-pitch nil :font my-font)
+ (set-face-attribute 'default nil :font my-font)
+ (set-face-attribute 'font-lock-comment-face nil :font my-font :slant 'italic)
;; (set-face-attribute 'region nil :background "orange")
- (set-face-attribute 'default nil :font "Hermit-14")
- (set-face-attribute 'variable-pitch nil :font "Frank Ruehl CLM-18"))
+ (set-face-attribute 'variable-pitch nil :font my-font)
+ )
(setq-default line-spacing nil)
@@ -77,7 +101,7 @@
(show-paren-mode t)
(setq-default truncate-lines t
- truncate-partial-width-windows nil)
+ truncate-partial-width-windows nil)
(setq scroll-step 1
scroll-margin 5)
@@ -123,5 +147,5 @@
initial-buffer-choice t)
(add-hook 'after-init-hook
- (lambda ()
- (setq default-directory "~/")))
+ (lambda ()
+ (setq default-directory "~/")))