[Emacs Lisp] Personal ~/.emacs.d/ configuration folder.
Indentation.
smart-documents.org
@@ -7,10 +7,9 @@
7
7
8
8
#+OPTIONS: html-style:nil
9
9
#+STARTUP: showall
10
Removed:
11
10
# LaTeX setup
12
11
#+SETUPFILE: ~/.emacs.d/templates/documents/gnu-default.setup
13
Removed:
# Title page for LaTeX
12
Added:
# Title page
14
13
#+INCLUDE: ~/.emacs.d/templates/documents/default-title.org
15
14
16
15
#+LATEX_HEADER_EXTRA: \newfontfamily\garamond{EB Garamond}
@@ -58,10 +57,10 @@
58
57
59
58
#+NAME: user-details-get
60
59
#+BEGIN_SRC emacs-lisp
61
Removed:
(setq user-full-name "Marius Peter")
60
Added:
(setq user-full-name "Marius Peter")
62
61
63
Removed:
(defun my/user-details-get ()
64
Removed:
"Get user details."
62
Added:
(defun my/user-details-get ()
63
Added:
"Get user details."
65
64
(setq user-full-name (read-string "Enter full user name:"))
66
65
(setq user-mail-address (read-string "Enter user e-mail address:"))
67
66
(message "Successfully captured user details."))
@@ -140,7 +139,7 @@
140
139
141
140
#+NAME: profiler-start
142
141
#+BEGIN_SRC emacs-lisp :tangle yes
143
Removed:
; (profiler-start)
142
Added:
; (profiler-start)
144
143
#+END_SRC
145
144
146
145
** Jumping to this file
@@ -149,10 +148,10 @@
149
148
150
149
#+NAME: shortcut-config
151
150
#+BEGIN_SRC emacs-lisp :tangle yes
152
Removed:
(defun my/find-literate-config ()
153
Removed:
"Jump to this very file."
154
Removed:
(interactive)
155
Removed:
(find-file my/literate-config))
151
Added:
(defun my/find-literate-config ()
152
Added:
"Jump to this very file."
153
Added:
(interactive)
154
Added:
(find-file my/literate-config))
156
155
#+END_SRC
157
156
158
157
** Meta-files
@@ -169,7 +168,7 @@
169
168
together:
170
169
171
170
#+BEGIN_SRC emacs-lisp :tangle yes
172
Removed:
(setq sd-meta-files-location (concat user-emacs-directory "meta/"))
171
Added:
(setq sd-meta-files-location (concat user-emacs-directory "meta/"))
173
172
#+END_SRC
174
173
175
174
*** Recently visited files
@@ -279,7 +278,7 @@
279
278
=Ctrl-c= and =Ctrl-v= keyboard shortcuts.]
280
279
281
280
#+BEGIN_SRC emacs-lisp :tangle yes
282
Removed:
(cua-mode)
281
Added:
(cua-mode)
283
282
#+END_SRC
284
283
285
284
** Files
@@ -307,7 +306,7 @@
307
306
(Function defined in Section [[Jumping to this file]])
308
307
309
308
#+BEGIN_SRC emacs-lisp :tangle yes
310
Removed:
(global-set-key (kbd "C-c c") 'my/find-literate-config)
309
Added:
(global-set-key (kbd "C-c c") 'my/find-literate-config)
311
310
#+END_SRC
312
311
313
312
*** Open a recently visited file
@@ -331,17 +330,17 @@
331
330
*** Open the diary
332
331
333
332
#+BEGIN_SRC emacs-lisp :tangle yes
334
Removed:
(global-set-key [f9]
335
Removed:
'(lambda ()
336
Removed:
"Load `org-agenda-diary-file'."
337
Removed:
(interactive)
338
Removed:
(find-file org-agenda-diary-file)))
333
Added:
(global-set-key [f9]
334
Added:
'(lambda ()
335
Added:
"Load `org-agenda-diary-file'."
336
Added:
(interactive)
337
Added:
(find-file org-agenda-diary-file)))
339
338
#+END_SRC
340
339
341
340
*** Open Org mode document properties
342
341
343
342
#+BEGIN_SRC emacs-lisp :tangle no
344
Removed:
(global-set-key [f9] 'sd-document-properties)
343
Added:
(global-set-key [f9] 'sd-document-properties)
345
344
#+END_SRC
346
345
347
346
** Windows
@@ -373,7 +372,7 @@
373
372
374
373
#+NAME: delete-frame-or-kill-emacs
375
374
#+BEGIN_SRC emacs-lisp :tangle yes
376
Removed:
(global-set-key (kbd "C-q") 'sd-delete-frame-or-kill-emacs)
375
Added:
(global-set-key (kbd "C-q") 'sd-delete-frame-or-kill-emacs)
377
376
#+END_SRC
378
377
379
378
** Text display
@@ -386,9 +385,9 @@
386
385
It seems that starting with Emacs 27.1, Control + mousewheel works.
387
386
388
387
#+BEGIN_SRC emacs-lisp :tangle yes
389
Removed:
(global-set-key (kbd "C--") 'text-scale-decrease)
390
Removed:
(global-set-key (kbd "C-=") 'text-scale-increase)
391
Removed:
(global-set-key (kbd "C-+") 'text-scale-increase)
388
Added:
(global-set-key (kbd "C--") 'text-scale-decrease)
389
Added:
(global-set-key (kbd "C-=") 'text-scale-increase)
390
Added:
(global-set-key (kbd "C-+") 'text-scale-increase)
392
391
#+END_SRC
393
392
394
393
** TODO Navigation
@@ -452,13 +451,13 @@
452
451
*** Customize a variable
453
452
454
453
#+BEGIN_SRC emacs-lisp :tangle yes
455
Removed:
(global-set-key (kbd "C-c v") 'customize-variable)
454
Added:
(global-set-key (kbd "C-c v") 'customize-variable)
456
455
#+END_SRC
457
456
458
457
*** Customize a face
459
458
460
459
#+BEGIN_SRC emacs-lisp :tangle yes
461
Removed:
(global-set-key (kbd "C-c f") 'customize-face)
460
Added:
(global-set-key (kbd "C-c f") 'customize-face)
462
461
#+END_SRC
463
462
464
463
** One-click workflows
@@ -504,7 +503,7 @@
504
503
Not only indent, but also clean up superfluous newlines.
505
504
506
505
#+BEGIN_SRC emacs-lisp :tangle yes
507
Removed:
(local-set-key [f12] 'sd-org-beautify)
506
Added:
(local-set-key [f12] 'sd-org-beautify)
508
507
#+END_SRC
509
508
510
509
* Packages
@@ -552,8 +551,8 @@
552
551
(package-install 'use-package)
553
552
(eval-when-compile (require 'use-package)))
554
553
(setq use-package-always-ensure t)
555
Removed:
(require 'use-package)
556
Removed:
(require 'bind-key)
554
Added:
(require 'use-package)
555
Added:
(require 'bind-key)
557
556
#+END_SRC
558
557
559
558
** ~evil-mode~
@@ -567,8 +566,8 @@
567
566
568
567
#+BEGIN_SRC emacs-lisp :tangle yes
569
568
(use-package evil)
570
Removed:
; (setq evil-toggle-key "C-c d") ; devil...
571
Removed:
; (evil-mode 1)
569
Added:
; (setq evil-toggle-key "C-c d") ; devil...
570
Added:
; (evil-mode 1)
572
571
#+END_SRC
573
572
574
573
** Spelling, completion, and snippets
@@ -617,8 +616,8 @@
617
616
618
617
#+NAME: yasnippet
619
618
#+BEGIN_SRC emacs-lisp :tangle yes
620
Removed:
(use-package yasnippet)
621
Removed:
(yas-global-mode 1)
619
Added:
(use-package yasnippet)
620
Added:
(yas-global-mode 1)
622
621
#+END_SRC
623
622
624
623
*** Complete anything interactively
@@ -646,7 +645,7 @@
646
645
647
646
#+BEGIN_SRC emacs-lisp :tangle yes
648
647
(use-package magit
649
Removed:
:bind ("C-c g" . magit-status))
648
Added:
:bind ("C-c g" . magit-status))
650
649
#+END_SRC
651
650
652
651
*** Navigate between projects
@@ -655,9 +654,9 @@
655
654
656
655
#+BEGIN_SRC emacs-lisp :tangle yes
657
656
(use-package projectile
658
Removed:
:bind ("C-c p" . 'projectile-command-map)
659
Removed:
:init (projectile-mode 1)
660
Removed:
(setq projectile-completion-system 'ivy))
657
Added:
:bind ("C-c p" . 'projectile-command-map)
658
Added:
:init (projectile-mode 1)
659
Added:
(setq projectile-completion-system 'ivy))
661
660
#+END_SRC
662
661
663
662
*** Display keyboard shortcuts on screen
@@ -674,15 +673,15 @@
674
673
the location of a symbol's definition.
675
674
676
675
#+BEGIN_SRC emacs-lisp :tangle yes
677
Removed:
(use-package dumb-jump)
678
Removed:
(add-hook 'xref-backend-functions #'dumb-jump-xref-activate)
676
Added:
(use-package dumb-jump)
677
Added:
(add-hook 'xref-backend-functions #'dumb-jump-xref-activate)
679
678
#+END_SRC
680
679
681
680
*** Graphical representation of file history
682
681
683
682
#+BEGIN_SRC emacs-lisp :tangle yes
684
Removed:
(use-package undo-tree)
685
Removed:
(global-undo-tree-mode)
683
Added:
(use-package undo-tree)
684
Added:
(global-undo-tree-mode)
686
685
#+END_SRC
687
686
688
687
*** Auto-completion framework
@@ -702,15 +701,15 @@
702
701
703
702
#+BEGIN_SRC emacs-lisp :tangle yes
704
703
(use-package counsel
705
Removed:
:bind ("M-x" . counsel-M-x)
706
Removed:
:config (counsel-mode t))
704
Added:
:bind ("M-x" . counsel-M-x)
705
Added:
:config (counsel-mode t))
707
706
#+END_SRC
708
707
709
708
**** Searching for items in current buffer
710
709
711
710
#+BEGIN_SRC emacs-lisp :tangle yes
712
Removed:
(use-package swiper
713
Removed:
:bind (("C-f" . swiper)))
711
Added:
(use-package swiper
712
Added:
:bind (("C-f" . swiper)))
714
713
#+END_SRC
715
714
716
715
*** Web browsing
@@ -719,15 +718,15 @@
719
718
Xah![fn::[[http://ergoemacs.org/emacs/emacs_set_default_browser.html]]]
720
719
721
720
#+BEGIN_SRC emacs-lisp :tangle yes
722
Removed:
;; use browser depending on url
723
Removed:
(setq
724
Removed:
browse-url-browser-function
725
Removed:
'(
726
Removed:
("wikipedia\\.org" . browse-url-firefox)
727
Removed:
("github" . browse-url-chromium)
728
Removed:
("thefreedictionary\\.com" . eww-browse-url)
729
Removed:
("." . browse-url-default-browser)
730
Removed:
))
721
Added:
;; use browser depending on url
722
Added:
(setq
723
Added:
browse-url-browser-function
724
Added:
'(
725
Added:
("wikipedia\\.org" . browse-url-firefox)
726
Added:
("github" . browse-url-chromium)
727
Added:
("thefreedictionary\\.com" . eww-browse-url)
728
Added:
("." . browse-url-default-browser)
729
Added:
))
731
730
#+END_SRC
732
731
733
732
*** IRC
@@ -765,10 +764,10 @@
765
764
Yeah, a Telegram client exists for Emacs.
766
765
767
766
#+BEGIN_SRC emacs-lisp :tangle no
768
Removed:
(use-package telega
769
Removed:
:load-path "~/telega.el/telega.el"
770
Removed:
:commands (telega)
771
Removed:
:defer t)
767
Added:
(use-package telega
768
Added:
:load-path "~/telega.el/telega.el"
769
Added:
:commands (telega)
770
Added:
:defer t)
772
771
#+END_SRC
773
772
774
773
** Coding languages
@@ -780,8 +779,8 @@
780
779
Python is included by default on most Linux distributions.
781
780
782
781
#+BEGIN_SRC emacs-lisp :tangle yes
783
Removed:
(use-package py-yapf)
784
Removed:
(add-hook 'python-mode-hook 'py-yapf-enable-on-save)
782
Added:
(use-package py-yapf)
783
Added:
(add-hook 'python-mode-hook 'py-yapf-enable-on-save)
785
784
#+END_SRC
786
785
787
786
** File formats
@@ -798,8 +797,8 @@
798
797
reliably be shared and exported to PDF in a reproducible fashion.
799
798
800
799
#+BEGIN_SRC emacs-lisp :tangle yes
801
Removed:
(use-package pdf-tools)
802
Removed:
(pdf-tools-install)
800
Added:
(use-package pdf-tools)
801
Added:
(pdf-tools-install)
803
802
#+END_SRC
804
803
805
804
*** Accounting
@@ -812,29 +811,29 @@
812
811
#+BEGIN_SRC emacs-lisp :tangle yes
813
812
(use-package ledger-mode
814
813
:bind
815
Removed:
("C-c r" . ledger-report)
816
Removed:
("C-c C" . ledger-mode-clean-buffer))
814
Added:
("C-c r" . ledger-report)
815
Added:
("C-c C" . ledger-mode-clean-buffer))
817
816
#+END_SRC
818
817
819
818
These reports can be generated within Emacs. It is quite useful to
820
819
pipe their output to an automated ``smart document''.
821
820
822
821
#+BEGIN_SRC emacs-lisp :tangle yes
823
Removed:
(setq ledger-reports
824
Removed:
'(("bal" "%(binary) -f %(ledger-file) bal")
825
Removed:
("bal-USD" "%(binary) -f %(ledger-file) bal --exchange USD")
826
Removed:
("reg" "%(binary) -f %(ledger-file) reg")
827
Removed:
("net-worth" "%(binary) -f %(ledger-file) bal ^Assets ^Liabilities --exchange USD")
828
Removed:
("net-income" "%(binary) -f %(ledger-file) bal ^Income ^Expenses --exchange USD --depth 2 --invert")
829
Removed:
("payee" "%(binary) -f %(ledger-file) reg @%(payee)")
830
Removed:
("account" "%(binary) -f %(ledger-file) reg %(account)")
831
Removed:
("budget" "%(binary) -f %(ledger-file) budget --exchange USD")))
822
Added:
(setq ledger-reports
823
Added:
'(("bal" "%(binary) -f %(ledger-file) bal")
824
Added:
("bal-USD" "%(binary) -f %(ledger-file) bal --exchange USD")
825
Added:
("reg" "%(binary) -f %(ledger-file) reg")
826
Added:
("net-worth" "%(binary) -f %(ledger-file) bal ^Assets ^Liabilities --exchange USD")
827
Added:
("net-income" "%(binary) -f %(ledger-file) bal ^Income ^Expenses --exchange USD --depth 2 --invert")
828
Added:
("payee" "%(binary) -f %(ledger-file) reg @%(payee)")
829
Added:
("account" "%(binary) -f %(ledger-file) reg %(account)")
830
Added:
("budget" "%(binary) -f %(ledger-file) budget --exchange USD")))
832
831
#+END_SRC
833
832
834
833
*** Plotting & charting
835
834
836
835
#+BEGIN_SRC emacs-lisp :tangle yes
837
Removed:
(use-package gnuplot)
836
Added:
(use-package gnuplot)
838
837
#+END_SRC
839
838
840
839
** Cosmetics
@@ -857,9 +856,9 @@
857
856
*** Better parentheses
858
857
859
858
#+BEGIN_SRC emacs-lisp :tangle yes
860
Removed:
(use-package rainbow-delimiters
861
Removed:
:config (add-hook 'prog-mode-hook #'rainbow-delimiters-mode))
862
Removed:
(show-paren-mode 1)
859
Added:
(use-package rainbow-delimiters
860
Added:
:config (add-hook 'prog-mode-hook #'rainbow-delimiters-mode))
861
Added:
(show-paren-mode 1)
863
862
#+END_SRC
864
863
865
864
*** Highlight /color/ keywords in that color
@@ -924,9 +923,9 @@
924
923
925
924
#+NAME: org-meta-info
926
925
#+BEGIN_SRC emacs-lisp :tangle no :results pp :exports both :cache yes
927
Removed:
(save-excursion
928
Removed:
(org-previous-visible-heading 1)
929
Removed:
(org-entry-properties))
926
Added:
(save-excursion
927
Added:
(org-previous-visible-heading 1)
928
Added:
(org-entry-properties))
930
929
#+END_SRC
931
930
932
931
(This block was evaluated on Microsoft Windows.)
@@ -947,13 +946,13 @@
947
946
948
947
#+NAME: org-directory
949
948
#+BEGIN_SRC emacs-lisp :tangle yes
950
Removed:
(setq org-directory (concat user-emacs-directory "~/org"))
949
Added:
(setq org-directory (concat user-emacs-directory "~/org"))
951
950
#+END_SRC
952
951
953
952
*** Prevent/warn on invisible edits
954
953
955
954
#+BEGIN_SRC emacs-lisp :tangle yes
956
Removed:
(setq org-catch-invisible-edits t)
955
Added:
(setq org-catch-invisible-edits t)
957
956
#+END_SRC
958
957
959
958
** Org cosmetics
@@ -994,8 +993,8 @@
994
993
attribute ~:background coral~.
995
994
996
995
#+BEGIN_SRC emacs-lisp :tangle yes
997
Removed:
(add-hook 'org-mode-hook 'org-num-mode)
998
Removed:
(setq org-num-face 'org-special-keyword)
996
Added:
(add-hook 'org-mode-hook 'org-num-mode)
997
Added:
(setq org-num-face 'org-special-keyword)
999
998
#+END_SRC
1000
999
1001
1000
By default, we hide Org document properties such as =#+TITLE=,
@@ -1007,37 +1006,37 @@
1007
1006
*** Document properties
1008
1007
1009
1008
#+BEGIN_SRC emacs-lisp :tangle yes
1010
Removed:
(defun org-property-value (property)
1011
Removed:
"Return the value of a given Org document property."
1012
Removed:
(interactive)
1013
Removed:
(save-excursion
1014
Removed:
(goto-char (point-min))
1015
Removed:
(re-search-forward
1016
Removed:
(concat
1017
Removed:
"^[[:space:]]*#\\+"
1018
Removed:
property
1019
Removed:
":[[:space:]]*\\(.*?\\)[[:space:]]*$")
1020
Removed:
nil t)
1021
Removed:
(nth 3 (car (cdr (org-element-at-point))))))
1009
Added:
(defun org-property-value (property)
1010
Added:
"Return the value of a given Org document property."
1011
Added:
(interactive)
1012
Added:
(save-excursion
1013
Added:
(goto-char (point-min))
1014
Added:
(re-search-forward
1015
Added:
(concat
1016
Added:
"^[[:space:]]*#\\+"
1017
Added:
property
1018
Added:
":[[:space:]]*\\(.*?\\)[[:space:]]*$")
1019
Added:
nil t)
1020
Added:
(nth 3 (car (cdr (org-element-at-point))))))
1022
1021
#+END_SRC
1023
1022
1024
1023
#+BEGIN_SRC emacs-lisp :tangle no
1025
Removed:
(defun sd-document-properties ()
1026
Removed:
"Open separate buffer to edit Org mode properties."
1027
Removed:
(interactive)
1028
Removed:
(let ((title (car (org-property-value "TITLE")))
1029
Removed:
(date (org-property-value "DATE")))
1030
Removed:
(with-output-to-temp-buffer "Smart Document Properties"
1031
Removed:
(print title)
1032
Removed:
(print date))))
1024
Added:
(defun sd-document-properties ()
1025
Added:
"Open separate buffer to edit Org mode properties."
1026
Added:
(interactive)
1027
Added:
(let ((title (car (org-property-value "TITLE")))
1028
Added:
(date (org-property-value "DATE")))
1029
Added:
(with-output-to-temp-buffer "Smart Document Properties"
1030
Added:
(print title)
1031
Added:
(print date))))
1033
1032
#+END_SRC
1034
1033
1035
1034
#+BEGIN_SRC emacs-lisp :tangle yes
1036
Removed:
(add-hook 'org-src-mode-hook
1037
Removed:
'(lambda ()
1038
Removed:
"Disable flycheck for `emacs-lisp-mode'."
1039
Removed:
(setq-local flycheck-disabled-checkers
1040
Removed:
'(emacs-lisp-checkdoc))))
1035
Added:
(add-hook 'org-src-mode-hook
1036
Added:
'(lambda ()
1037
Added:
"Disable flycheck for `emacs-lisp-mode'."
1038
Added:
(setq-local flycheck-disabled-checkers
1039
Added:
'(emacs-lisp-checkdoc))))
1041
1040
#+END_SRC
1042
1041
1043
1042
*** Timestamps
@@ -1046,8 +1045,8 @@
1046
1045
custom format:
1047
1046
1048
1047
#+BEGIN_SRC emacs-lisp :tangle yes
1049
Removed:
(setq org-time-stamp-custom-formats
1050
Removed:
'("%d %b. %Y (%a)" . "%d %b. %Y (%a), at %H:%M"))
1048
Added:
(setq org-time-stamp-custom-formats
1049
Added:
'("%d %b. %Y (%a)" . "%d %b. %Y (%a), at %H:%M"))
1051
1050
#+END_SRC
1052
1051
1053
1052
** Programming a Smart Documents
@@ -1152,13 +1151,13 @@
1152
1151
blocks in LaTeX exports.
1153
1152
1154
1153
#+BEGIN_SRC emacs-lisp :tangle yes
1155
Removed:
(when (string-equal system-type "gnu/linux")
1156
Removed:
(add-to-list 'org-latex-packages-alist '("AUTO" "minted" t
1157
Removed:
("pdflatex" "lualatex")))
1158
Removed:
(setq org-latex-listings 'minted)
1159
Removed:
(setq org-latex-minted-options '(("style" "friendly")
1160
Removed:
("breaklines" "true")
1161
Removed:
("breakanywhere" "true"))))
1154
Added:
(when (string-equal system-type "gnu/linux")
1155
Added:
(add-to-list 'org-latex-packages-alist '("AUTO" "minted" t
1156
Added:
("pdflatex" "lualatex")))
1157
Added:
(setq org-latex-listings 'minted)
1158
Added:
(setq org-latex-minted-options '(("style" "friendly")
1159
Added:
("breaklines" "true")
1160
Added:
("breakanywhere" "true"))))
1162
1161
#+END_SRC
1163
1162
1164
1163
*** Cleaning directory after export
@@ -1182,7 +1181,7 @@
1182
1181
they were recorded, i.e. chronologically.
1183
1182
1184
1183
#+BEGIN_SRC emacs-lisp :tangle yes
1185
Removed:
(setq org-agenda-insert-diary-strategy 'date-tree-last)
1184
Added:
(setq org-agenda-insert-diary-strategy 'date-tree-last)
1186
1185
#+END_SRC
1187
1186
1188
1187
*** Extra LaTeX class
@@ -1190,14 +1189,14 @@
1190
1189
This /letter/ template completes the other default LaTeX classes.
1191
1190
1192
1191
#+BEGIN_SRC emacs-lisp :tangle yes
1193
Removed:
(require 'ox-publish)
1194
Removed:
(add-to-list 'org-latex-classes
1195
Removed:
'("letter"
1196
Removed:
"\\documentclass[11pt]{letter}"
1197
Removed:
("\\chapter{%s}" . "\\chapter*{%s}")
1198
Removed:
("\\section{%s}" . "\\section*{%s}")
1199
Removed:
("\\subsection*{%s}" . "\\subsection*{%s}")
1200
Removed:
("\\subsubsection*{%s}" . "\\subsubsection*{%s}")))
1192
Added:
(require 'ox-publish)
1193
Added:
(add-to-list 'org-latex-classes
1194
Added:
'("letter"
1195
Added:
"\\documentclass[11pt]{letter}"
1196
Added:
("\\chapter{%s}" . "\\chapter*{%s}")
1197
Added:
("\\section{%s}" . "\\section*{%s}")
1198
Added:
("\\subsection*{%s}" . "\\subsection*{%s}")
1199
Added:
("\\subsubsection*{%s}" . "\\subsubsection*{%s}")))
1201
1200
#+END_SRC
1202
1201
1203
1202
*** Table of contents
@@ -1207,7 +1206,7 @@
1207
1206
work.
1208
1207
1209
1208
#+BEGIN_SRC emacs-lisp :tangle yes
1210
Removed:
(setq org-latex-toc-command "\\tableofcontents\\clearpage")
1209
Added:
(setq org-latex-toc-command "\\tableofcontents\\clearpage")
1211
1210
#+END_SRC
1212
1211
1213
1212
The following makes =TODO= items appear red and =CLOSED= items appear
@@ -1342,8 +1341,8 @@
1342
1341
This is just a better default. Don't @ me.
1343
1342
1344
1343
#+BEGIN_SRC emacs-lisp :tangle yes
1345
Removed:
(setq c-default-style "linux"
1346
Removed:
c-basic-offset 4)
1344
Added:
(setq c-default-style "linux"
1345
Added:
c-basic-offset 4)
1347
1346
#+END_SRC
1348
1347
1349
1348
*** Recent files
@@ -1361,7 +1360,7 @@
1361
1360
*** Reload changed files silently
1362
1361
1363
1362
#+BEGIN_SRC emacs-lisp :tangle yes
1364
Removed:
(global-auto-revert-mode)
1363
Added:
(global-auto-revert-mode)
1365
1364
#+END_SRC
1366
1365
1367
1366
** Frame
@@ -1510,18 +1509,18 @@
1510
1509
Save cursor location in visited buffer after closing it or Emacs.
1511
1510
1512
1511
#+BEGIN_SRC emacs-lisp :tangle yes
1513
Removed:
(save-place-mode 1)
1512
Added:
(save-place-mode 1)
1514
1513
#+END_SRC
1515
1514
1516
1515
*** Column filling
1517
1516
1518
1517
We leave the default ~fill-column~ unchanged, so as to minimally
1519
Removed:
disrupt a user's existing documents.
1518
Added:
disrupt a user's existing documents. We automatically break lines
1519
Added:
longer than =fill-column=.
1520
1520
1521
1521
#+BEGIN_SRC emacs-lisp :tangle yes
1522
1522
(add-hook 'org-mode-hook
1523
Removed:
'turn-on-auto-fill) ; Automatically break lines longer
1524
Removed:
; than =fill-column=.
1523
Added:
'turn-on-auto-fill)
1525
1524
#+END_SRC
1526
1525
1527
1526
** Text
@@ -1538,7 +1537,7 @@
1538
1537
*** Org mode sugar
1539
1538
1540
1539
Let's pimp out the appearance of our text in Org mode. First, we
1541
Removed:
prettify checkbox lists.
1540
Added:
prettify checkbox lists when viewed on GNU/Linux systems.
1542
1541
1543
1542
#+BEGIN_SRC emacs-lisp :tangle yes
1544
1543
(when (string-equal system-type "gnu/linux")
@@ -1582,7 +1581,7 @@
1582
1581
Disable minibuffer scroll bar.
1583
1582
1584
1583
#+BEGIN_SRC emacs-lisp :tangle yes
1585
Removed:
(set-window-scroll-bars (minibuffer-window) nil nil)
1584
Added:
(set-window-scroll-bars (minibuffer-window) nil nil)
1586
1585
#+END_SRC
1587
1586
1588
1587
* Themes
@@ -1612,7 +1611,7 @@
1612
1611
#+NAME: theme-color-1
1613
1612
#+CAPTION[Light and dark themes' colors]: Light and dark themes' colors.
1614
1613
#+ATTR_LATEX: :booktabs t
1615
Removed:
| Color | ~blendoit-light~ | ~blendoit-dark~ |
1614
Added:
| Color | ~sd-light~ | ~sd-dark~ |
1616
1615
|---------------------------------+---------------------------------+--------------------|
1617
1616
| Black | default text | default background |
1618
1617
| \_ Lighter shades | lesser headers | /n/a/ |
@@ -1655,7 +1654,7 @@
1655
1654
the cursor is a more MS Word-like bar.
1656
1655
1657
1656
#+BEGIN_SRC emacs-lisp :tangle yes
1658
Removed:
(setq-default cursor-type 'bar)
1657
Added:
(setq-default cursor-type 'bar)
1659
1658
#+END_SRC
1660
1659
1661
1660
*** Fonts
@@ -1769,13 +1768,13 @@
1769
1768
** Profiling---stop
1770
1769
1771
1770
#+BEGIN_SRC emacs-lisp :tangle yes
1772
Removed:
;; (profiler-stop)
1771
Added:
;; (profiler-stop)
1773
1772
#+END_SRC
1774
1773
1775
1774
** Profiling---report
1776
1775
1777
1776
#+BEGIN_SRC emacs-lisp :tangle yes
1778
Removed:
;; (profiler-report)
1777
Added:
;; (profiler-report)
1779
1778
#+END_SRC
1780
1779
1781
1780
* Conclusion