Make the prettify-symbols-mode section easier to read

This commit is contained in:
Gergely Polonkai 2020-11-05 08:23:46 +01:00
parent e343fda9e1
commit 8b2e5d8659
No known key found for this signature in database
GPG Key ID: 2D2885533B869ED4

View File

@ -1185,18 +1185,22 @@ Because we can.
And set up all the pretty symbols. And set up all the pretty symbols.
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
;; Add some symbols to be prettified
(setq prettify-symbols-alist (setq prettify-symbols-alist
'(("lambda" . 955) ; λ '(("lambda" . 955) ; λ
("function" . 402) ; ƒ ("function" . 402) ; ƒ
("->" . 8594) ; → ("->" . 8594) ; →
("=>" . 8658) ; ⇒ ("=>" . 8658) ; ⇒
("map" . 8614) ; ↦ ("map" . 8614) ; ↦
("not" . 172)) ; ¬ ("not" . 172))) ; ¬
#+END_SRC
;; …and some pairs to complete …and some pairs to complete
;; TODO: maybe add-to-list is a better way to do it
insert-pair-alist '( *************** TODO Maybe add-to-list is a better way to do it
*************** END
#+BEGIN_SRC emacs-lisp
(setq insert-pair-alist '(
(40 41) ; () (40 41) ; ()
(91 93) ; [] (91 93) ; []
(123 125) ; {} (123 125) ; {}
@ -1210,14 +1214,16 @@ And set up all the pretty symbols.
(8249 8250) ; (8249 8250) ;
(8250 8249) ; (8250 8249) ;
(171 187) ; «» (171 187) ; «»
(187 171)) ; »« (187 171))) ; »«
#+END_SRC
;; Set the frame title to the current file name Finally, set the frame title to the current file name
frame-title-format '((:eval (concat system-name
#+BEGIN_SRC emacs-lisp
(setq frame-title-format '((:eval (concat system-name
": " ": "
(if (buffer-file-name) (if (buffer-file-name)
(abbreviate-file-name (abbreviate-file-name (buffer-file-name))
(buffer-file-name))
"%b"))))) "%b")))))
#+END_SRC #+END_SRC
@ -2967,6 +2973,8 @@ This is a big one; I use a lot of customisation here.
(require 'org-protocol) (require 'org-protocol)
;; Make it possible to encrypt headings ;; Make it possible to encrypt headings
(require 'org-crypt) (require 'org-crypt)
;; Make it possible to use inline tasks
(require 'org-inlinetask)
:custom :custom
(org-log-into-drawer t) (org-log-into-drawer t)