From e41bc366a2ecc010f57064d32d0c7b595fa1ccc4 Mon Sep 17 00:00:00 2001 From: noa Date: Tue, 17 Sep 2024 09:38:17 +0800 Subject: Remove superfluous newlines --- emacs/init.el | 12 ------------ 1 file changed, 12 deletions(-) diff --git a/emacs/init.el b/emacs/init.el index d75a027..9194462 100644 --- a/emacs/init.el +++ b/emacs/init.el @@ -71,7 +71,6 @@ (global-set-key (kbd "") 'execute-extended-command) ;; It is often useful to be able to run a command while i am already in the process of running a command in the minibuffer. This is rarely two extended commands; usually it is completion. - (setopt minibuffer-depth-indicate-mode t) ;;; Aesthetic changes @@ -79,38 +78,27 @@ ;; Colour theme ;; This is my emacs theme. It's a monochrome theme which, unlike most monochrome themes, really does have only two colours. I define a few faces, and set every other face as one of them. There are a few things i want to do with it before i make it properly public: make the colours configurable and able to update on the fly, and in general iron out some of the janky parts. A few things defined it are quite specific to this configuration, like the way i define the borders for the tab and header bars, and there is no mode line configuration because i don't use it. - (require 'tubthumping-theme) (load-theme 'tubthumping t) ;;; Fonts ;; Using a proportional font is the right way to do things, but emacs is very old and comes from a time before the innovation of legibility. As a result, there are some things that require a monospaced font, so i set one here. - (custom-set-faces '(default ((t (:family "Noto Sans" :height 120)))) '(variable-pitch ((t (:family "Noto Sans" :height 120)))) '(fixed-pitch ((t (:family "Noto Sans Mono" :height 120))))) ;; For some frustrating reason, emacs does not respect fontconfig font settings. What this means in practice is that emacs by default draws cjk characters with the korean variant. Luckily emacs has its own obscure and poorly documented way of doing things, so i can iterate over the relevant charsets and set the font specifically for those characters. - (dolist (charset '(han cjk-misc)) (set-fontset-font t charset (font-spec :family "Noto Sans CJK SC"))) ;; Similar to the above, we have to manually set the font we want to be used for emoji. I like the cute style of the emoji in fsd emoji, but it doesn't have very good coverage, so we also set noto emoji as the backup. Note that noto emoji is not the same as noto color emoji, which uses coloured emoji. That's clearly against the vibe of this emacs! - (set-fontset-font t 'emoji (font-spec :family "FSD Emoji") nil 'prepend) (set-fontset-font t 'emoji (font-spec :family "Noto Emoji") nil 'append) ;; While we're here, let's set up emoji input. - (global-set-key (kbd "C-.") #'emoji-search) -;; Describe a key based on a string like "C-SPC" - -(defun describe-key-shortcut (shortcut) - (interactive "MShortcut: ") - (describe-key (kbd shortcut))) - ;; Update the calendar. We want weeks to start on a monday, the first day of the week. Holidays should be highlighted, and the date format should put the year first. (setopt calendar-week-start-day 1 -- cgit 1.4.1-2-gfad0