[Emacs Lisp] Personal ~/.emacs.d/ configuration folder.
Installing Guix fr now!
Changed files
bookmarks
@@ -1,15 +0,0 @@
1
Removed:
;;;; Emacs Bookmark Format Version 1 ;;;; -*- coding: utf-8-emacs -*-
2
Removed:
;;; This format is meant to be slightly human-readable;
3
Removed:
;;; nevertheless, you probably don't want to edit it.
4
Removed:
;;; -*- End Of Bookmark File Format Version Stamp -*-
5
Removed:
(("org-refile-last-stored"
6
Removed:
(filename . "~/org/WORK/2021-job-search/RAIL-job-search-2021-09-17.org")
7
Removed:
(front-context-string . "** FOLLOW UP EDF")
8
Removed:
(rear-context-string . "olkswagen Group\n")
9
Removed:
(position . 23388))
10
Removed:
("org-capture-last-stored"
11
Removed:
(filename . "~/.emacs.d/resources/org/default-notes.org")
12
Removed:
(front-context-string . "** TODO Do this\n")
13
Removed:
(rear-context-string)
14
Removed:
(position . 9))
15
Removed:
)
resources/custom.el
@@ -20,7 +20,7 @@
20
20
(output-html "xdg-open")))
21
21
'(ansi-color-names-vector
22
22
["#3F3F3F" "#CC9393" "#7F9F7F" "#F0DFAF" "#8CD0D3" "#DC8CC3" "#93E0E3" "#DCDCCC"])
23
Removed:
'(browse-url-browser-function 'browse-url-firefox)
23
Added:
'(browse-url-browser-function 'browse-url-default-browser)
24
24
'(column-number-mode t)
25
25
'(company-quickhelp-color-background "#4F4F4F")
26
26
'(company-quickhelp-color-foreground "#DCDCCC")
@@ -28,7 +28,7 @@
28
28
'(cursor-type 'bar)
29
29
'(custom-enabled-themes nil)
30
30
'(custom-safe-themes
31
Removed:
'("03ba8d0d53d972508db964fa88c3cb8610604e364d4f4163dffb495c9de0a144" "2877431bffac5322ba62437547002039a466a846e04eefcf817f745dd75f8191" "633b9c85026b2159928553f2fe828b3b80b2581c7e3b324e2b0eac8f604c483b" "422a317d1eed69a367d1506fe15a928dd18426ade0d6ee76bb390402f7c4e3aa" "9a7c95cf28858105c3265f6be4b36447092682c9e49cfbe1fe81c029fbed8db8" "e9954eb5df6bb9a3730639c5a6ce9b7db4d753a5935d9b73953cabe032fbfbd2" "9547849e788cd0a520c445bed08d248742d5d2b7c0c750bbab284e98810dd551" "7e03b8096f27ea37c12abc9afff4922659c79221d0c6815700b8fabbc450ca7c" "6751665922c478d0aee39f06fc269dd82dc109b8dabb0e3b443cab511aa5fe2e" "5147d19a022bb32b3b084f7c746ad8ac20e56f89e1720ddd25758710406e7614" "b067125d603e44d886d1fcbeb82f6db4b2ad79c7244bce32d2a863d05b1e6dc6" "c21761ef593f2c6258f4b602cb785aebf9fe18d4e6b659dbca7850caf0b33a74" "8205f1caf1334c56a3360438ace84d2a1ade86923929e766e53987c9b5a5cd7d" "d1d7ccb8f1c17a3f53b10b769ccd3b8b62c0230dde88ca23dd8fe85a3fe1fa74" "c353dde8298eb4fd36d534d30f99d1b71844871c1e5e89a273479582190cce10" "98cbdcf881aa40774a278953571a46a19505d2c168a29760d016a54483470d3f" "6796c19189021d5643e7b4fe2238834da597ffe1087d8919da386b6bba827112" "bc627b8eccb0f82eb00f7a7cdb2fd2b66422ddbe46e01de66dcd0936a414958c" "a23a48bb7bac7d46c61e779e0b9a3e003387b4b9543163e9db562a12ff96333b" "32df8feae4f9846e05dcb578e48be7c465971b7664469431dd13bfe01dbe0872" "ebbbdfe1bf03a99559116736d073500a2100c463c242ab7f7feabce4d22aa6ae" "cd0f588f48c6f3c1eb25084396820f8c938c28fb489487262d60168b1a6385f7" "6f78c6f29feef7561fe7224a4e9c73b87940ff888b92cae27fd63cf0de10c7c7" "fff87b42a0999ee2e7a28507e3f0746fbc3e1eb1394ce74e9dee2cf4a81d080d" "0bbbb6fb8921bcca20e3dc0a628867cfac8b82487b464deb93da38388ca86503" "280de4d8dd8980fa1c5a8f1d726d89932df982fccc33dbcc74d107ef941211a2" "fb8357d6a94ab57b3e5062b481876f0b6c7149f2394a6ec46f1ca92487fbc888" "ea287582eaea4e0c0a991ad0aa42f679f21b8d92766762bcc4d730d4aa6c8fd7" "07e0a2ea30155beb57b51f031a9a1c975e201bd497982ba3bf5093a6715300d9" "5a6e72c173208edfaa2f591b669294636f7ee7fbf5bcf901c9c9d52b0c69ce6e" "69e4d8638af3287be6b70391b75c816b67b47578dc88141a1643d32ba806ac8a" "cdc38ce5913c5e2b69bf6a4984ec0c9d0be8eddb71db55b9ee659ed103919aab" "44854133f0525c7e714e1b04f3ddfd01d87176e914d2efb0cc755458c510719f" "7a2fd29088d19e5e9428851a5c3c13e330ad1789ae558782c208b94a5234d9ca" "6565cf9ef99fd03e4514dc72dca6dd900007ec35c3bb0b65053f8041b7b64b83" "d24ae1c19dbf63a629fe84d4df55cbbc494b5694978157b870f57b61c03bf334" "b8244418af8bc37c4b076a021cacb1bda94fb70e506a5b50c40d1a0ed92a15d6" "c480484ec6a61d87d3dab2443e7b04832659bafc1d2b5bcaacb3d977bdbea928" "82d48184709ea6777d920226b4d95986ac469f5c01b0652b3b63566124a959d5" "8f567db503a0d27202804f2ee51b4cd409eab5c4374f57640317b8fcbbd3e466" "e6df46d5085fde0ad56a46ef69ebb388193080cc9819e2d6024c9c6e27388ba9" default))
31
Added:
'("4447d9707582225f7b2998c0728e3ca26133aa911b1e2720cedcd375cbf0014b" "c68a090711fd539357afc8d5f07d4e978c24be255e4fcd7e3bce3896b5579270" "f370b6f29926ebc1ed599785db8982bfcd26cc13ac9873fa95491ff1fb4c5292" "581e250fce111f3d88943657bbe5dfca4e85cfa336b32a831b7b26ff6b6cdab4" "e9db16248eb2fdd91028ba5f4dccb8ea5a92d3266c5bcb8b85ae2e56494209a7" "7ab64e2f8b921d1a0397e7db6dd358f51d372bf85e65d85d89e1f5a3d25a6195" "03ba8d0d53d972508db964fa88c3cb8610604e364d4f4163dffb495c9de0a144" "2877431bffac5322ba62437547002039a466a846e04eefcf817f745dd75f8191" "633b9c85026b2159928553f2fe828b3b80b2581c7e3b324e2b0eac8f604c483b" "422a317d1eed69a367d1506fe15a928dd18426ade0d6ee76bb390402f7c4e3aa" "9a7c95cf28858105c3265f6be4b36447092682c9e49cfbe1fe81c029fbed8db8" "e9954eb5df6bb9a3730639c5a6ce9b7db4d753a5935d9b73953cabe032fbfbd2" "9547849e788cd0a520c445bed08d248742d5d2b7c0c750bbab284e98810dd551" "7e03b8096f27ea37c12abc9afff4922659c79221d0c6815700b8fabbc450ca7c" "6751665922c478d0aee39f06fc269dd82dc109b8dabb0e3b443cab511aa5fe2e" "5147d19a022bb32b3b084f7c746ad8ac20e56f89e1720ddd25758710406e7614" "b067125d603e44d886d1fcbeb82f6db4b2ad79c7244bce32d2a863d05b1e6dc6" "c21761ef593f2c6258f4b602cb785aebf9fe18d4e6b659dbca7850caf0b33a74" "8205f1caf1334c56a3360438ace84d2a1ade86923929e766e53987c9b5a5cd7d" "d1d7ccb8f1c17a3f53b10b769ccd3b8b62c0230dde88ca23dd8fe85a3fe1fa74" "c353dde8298eb4fd36d534d30f99d1b71844871c1e5e89a273479582190cce10" "98cbdcf881aa40774a278953571a46a19505d2c168a29760d016a54483470d3f" "6796c19189021d5643e7b4fe2238834da597ffe1087d8919da386b6bba827112" "bc627b8eccb0f82eb00f7a7cdb2fd2b66422ddbe46e01de66dcd0936a414958c" "a23a48bb7bac7d46c61e779e0b9a3e003387b4b9543163e9db562a12ff96333b" "32df8feae4f9846e05dcb578e48be7c465971b7664469431dd13bfe01dbe0872" "ebbbdfe1bf03a99559116736d073500a2100c463c242ab7f7feabce4d22aa6ae" "cd0f588f48c6f3c1eb25084396820f8c938c28fb489487262d60168b1a6385f7" "6f78c6f29feef7561fe7224a4e9c73b87940ff888b92cae27fd63cf0de10c7c7" "fff87b42a0999ee2e7a28507e3f0746fbc3e1eb1394ce74e9dee2cf4a81d080d" "0bbbb6fb8921bcca20e3dc0a628867cfac8b82487b464deb93da38388ca86503" "280de4d8dd8980fa1c5a8f1d726d89932df982fccc33dbcc74d107ef941211a2" "fb8357d6a94ab57b3e5062b481876f0b6c7149f2394a6ec46f1ca92487fbc888" "ea287582eaea4e0c0a991ad0aa42f679f21b8d92766762bcc4d730d4aa6c8fd7" "07e0a2ea30155beb57b51f031a9a1c975e201bd497982ba3bf5093a6715300d9" "5a6e72c173208edfaa2f591b669294636f7ee7fbf5bcf901c9c9d52b0c69ce6e" "69e4d8638af3287be6b70391b75c816b67b47578dc88141a1643d32ba806ac8a" "cdc38ce5913c5e2b69bf6a4984ec0c9d0be8eddb71db55b9ee659ed103919aab" "44854133f0525c7e714e1b04f3ddfd01d87176e914d2efb0cc755458c510719f" "7a2fd29088d19e5e9428851a5c3c13e330ad1789ae558782c208b94a5234d9ca" "6565cf9ef99fd03e4514dc72dca6dd900007ec35c3bb0b65053f8041b7b64b83" "d24ae1c19dbf63a629fe84d4df55cbbc494b5694978157b870f57b61c03bf334" "b8244418af8bc37c4b076a021cacb1bda94fb70e506a5b50c40d1a0ed92a15d6" "c480484ec6a61d87d3dab2443e7b04832659bafc1d2b5bcaacb3d977bdbea928" "82d48184709ea6777d920226b4d95986ac469f5c01b0652b3b63566124a959d5" "8f567db503a0d27202804f2ee51b4cd409eab5c4374f57640317b8fcbbd3e466" "e6df46d5085fde0ad56a46ef69ebb388193080cc9819e2d6024c9c6e27388ba9" default))
32
32
'(electric-indent-mode t)
33
33
'(erc-modules
34
34
'(autojoin button completion services spelling track netsplit fill match readonly networks ring noncommands irccontrols move-to-prompt stamp menu list))
@@ -67,7 +67,7 @@
67
67
'(org-table-convert-region-max-lines 3000)
68
68
'(org-tags-column -66)
69
69
'(package-selected-packages
70
Removed:
'(ivy yasnippet which-key use-package undo-tree tuareg rich-minority rainbow-mode rainbow-delimiters py-yapf projectile plantuml-mode pdf-tools magit lua-mode ledger-mode hungry-delete haskell-mode gnuplot flycheck emojify dumb-jump csv-mode counsel auctex-latexmk))
70
Added:
'(all-the-icons ivy yasnippet which-key use-package undo-tree tuareg rich-minority rainbow-mode rainbow-delimiters py-yapf projectile plantuml-mode pdf-tools magit lua-mode ledger-mode hungry-delete haskell-mode gnuplot flycheck emojify dumb-jump csv-mode counsel auctex-latexmk))
71
71
'(pdf-view-midnight-colors '("#DCDCCC" . "#383838"))
72
72
'(save-place-mode t)
73
73
'(send-mail-function 'smtpmail-send-it)
resources/org/default-notes.org
@@ -1,3 +1,6 @@
1
1
* Tasks
2
2
** TODO Do this
3
3
[2021-10-06 Wed]
4
Added:
** TODO Do that instead.
5
Added:
[2021-12-20 Mon]
6
Added:
[[file:~/.emacs.d/meta/bookmarks::front-context-string . "** TODO Do this\n"]]
resources/templates/documents/ms-default.setup
@@ -55,7 +55,7 @@
55
55
#+LATEX_HEADER_EXTRA: \hrulefill\\[0.8em]
56
56
#+LATEX_HEADER_EXTRA: Page \thepage/\pageref*{LastPage}\\[0.8em]
57
57
#+LATEX_HEADER_EXTRA: \footnotesize Compiled with
58
Removed:
#+LATEX_HEADER_EXTRA: \includegraphics[width = 1.618ex]{C:/Users/blend/AppData/Roaming/.emacs.d/img/icons/EmacsIcon.png}/
59
Removed:
#+LATEX_HEADER_EXTRA: \includegraphics[width = 1.618ex]{C:/Users/blend/AppData/Roaming/.emacs.d/img/icons/Org-mode-unicorn.png}/
60
Removed:
#+LATEX_HEADER_EXTRA: \includegraphics[width = 1.618ex]{C:/Users/blend/AppData/Roaming/.emacs.d/img/icons/LuaTeX_logo.png}/...\\
58
Added:
#+LATEX_HEADER_EXTRA: \includegraphics[width = 1.618ex]{C:/Users/blend/AppData/Roaming/.emacs.d/resources/images/icons/EmacsIcon.png}/
59
Added:
#+LATEX_HEADER_EXTRA: \includegraphics[width = 1.618ex]{C:/Users/blend/AppData/Roaming/.emacs.d/resources/images/icons/Org-mode-unicorn.png}/
60
Added:
#+LATEX_HEADER_EXTRA: \includegraphics[width = 1.618ex]{C:/Users/blend/AppData/Roaming/.emacs.d/resources/images/icons/LuaTeX_logo.png}/...\\
61
61
#+LATEX_HEADER_EXTRA: Copyright \copyright~2020 Marius Peter. All rights reserved.}
resources/themes/sd-compagnon-dark-theme.el
@@ -1,5 +1,5 @@
1
1
(deftheme sd-compagnon-dark
2
Removed:
"Created 2021-07-07.")
2
Added:
"Created 2021-12-20.")
3
3
4
4
(custom-theme-set-variables
5
5
'sd-compagnon-dark
@@ -12,7 +12,7 @@
12
12
'(variable-pitch ((t (:family "Compagnon Roman"))))
13
13
'(escape-glyph ((t (:foreground "orange"))))
14
14
'(homoglyph ((t (:foreground "cyan"))))
15
Removed:
'(minibuffer-prompt ((t (:inherit (org-meta-line)))))
15
Added:
'(minibuffer-prompt ((t (:inherit org-meta-line))))
16
16
'(highlight ((t (:box (:line-width 2 :color "medium spring green") :background "sea green"))))
17
17
'(region ((t (:extend t :background "medium sea green"))))
18
18
'(shadow ((t (:foreground "light slate gray"))))
@@ -33,13 +33,13 @@
33
33
'(font-lock-type-face ((t (:foreground "orchid2"))))
34
34
'(font-lock-variable-name-face ((t (:weight bold))))
35
35
'(font-lock-warning-face ((t (:inherit (error)))))
36
Removed:
'(button ((t (:foundry "Compagnon Light"))))
36
Added:
'(button ((t (:box (:line-width 2 :color "slate gray" :style released-button) :foundry "Compagnon Light"))))
37
37
'(link ((t (:foreground "green yellow" :family "Compagnon Light Italic"))))
38
38
'(link-visited ((t (:inherit link :foreground "yellow green"))))
39
39
'(fringe ((t (:background "gainsboro"))))
40
40
'(header-line ((t (:inherit org-meta-line :weight bold :height 1.8))))
41
Removed:
'(tooltip ((t (:background "white smoke" :foreground "sea green" :family "Hermit"))))
42
Removed:
'(mode-line ((t (:inherit org-meta-line :box (:line-width -1 :style released-button)))))
41
Added:
'(tooltip ((t (:background "white smoke" :foreground "sea green" :family "Compagnon Medium"))))
42
Added:
'(mode-line ((t (:box (:line-width 2 :style released-button) :inherit org-meta-line))))
43
43
'(mode-line-buffer-id ((t (:weight bold))))
44
44
'(mode-line-emphasis ((t (:weight bold))))
45
45
'(mode-line-highlight ((t (:box (:line-width 2 :color "grey40" :style released-button)))))
@@ -80,6 +80,6 @@
80
80
'(show-paren-mismatch ((t (:background "orange red" :foreground "white"))))
81
81
'(org-drawer ((t (:inherit org-block-begin-line))))
82
82
'(org-agenda-structure ((t (:foreground "Green Yellow"))))
83
Removed:
'(default ((t (:inherit nil :extend nil :stipple nil :background "gray15" :foreground "white" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight semi-bold :height 142 :width normal :foundry "UKWN" :family "Compagnon Medium")))))
83
Added:
'(default ((t (:inherit nil :extend nil :stipple nil :background "gray15" :foreground "white" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight semi-bold :height 142 :width normal :family "Compagnon Medium")))))
84
84
85
85
(provide-theme 'sd-compagnon-dark)
smart-documents.org
@@ -42,6 +42,7 @@
42
42
43
43
** TODO <apps> button as master {{{sd}}} entry point
44
44
45
Added:
** TODO Turn ~left-fringe~ into ~org-agenda~ buffer drawer
45
46
46
47
* Introduction
47
48
@@ -181,7 +182,7 @@
181
182
182
183
In this section, we'll be tidying up the =.emacs.d/= directory---by
183
184
default, many Emacs packages create files useful for themselves in our
184
Removed:
~user-emacs-directory~. This leads to undesirable clutter. Certain
185
Added:
[[help:user-emacs-directory][user-emacs-directory]]. This leads to undesirable clutter. Certain
185
186
packages create files that log recently visited files ([[Recently
186
187
visited files]]); log location of known projects ([[Projects' bookmarks]]);
187
188
log location in recently visited files ([[Location in previously visited
@@ -189,10 +190,18 @@
189
190
reference... other files. Thus, I decided to refer to them as meta
190
191
files.
191
192
193
Added:
A meta files should follow the following best principles:
194
Added:
195
Added:
- Be located at [[help:sd-path-meta][sd-path-meta]] :: This ensures a tidy
196
Added:
[[help:user-emacs-directory][user-emacs-directory]].
197
Added:
- Be explicit :: Meta filenames should not begin with a period: they
198
Added:
would be hidden by default on GNU/Linux systems. Novices must see
199
Added:
all files by default.
200
Added:
192
201
#+BEGIN_SRC emacs-lisp :tangle yes
193
202
(defcustom sd-path-meta
194
203
(concat user-emacs-directory "meta/")
195
Removed:
"Directory (which is a file, really) containing files about files.")
204
Added:
"Directory containing files about files.")
196
205
#+END_SRC
197
206
198
207
**** Recently visited files
@@ -202,6 +211,13 @@
202
211
(concat sd-path-meta "recentf"))
203
212
#+END_SRC
204
213
214
Added:
**** File bookmarks
215
Added:
216
Added:
#+BEGIN_SRC emacs-lisp :tangle yes
217
Added:
(setq bookmark-default-file
218
Added:
(concat sd-path-meta "bookmarks"))
219
Added:
#+END_SRC
220
Added:
205
221
**** Projects' bookmarks
206
222
207
223
#+BEGIN_SRC emacs-lisp :tangle yes
@@ -209,6 +225,24 @@
209
225
(concat sd-path-meta "projectile-bookmarks.eld"))
210
226
#+END_SRC
211
227
228
Added:
**** Org id locations
229
Added:
230
Added:
#+begin_quote
231
Added:
We track IDs through files, so that links work globally. The file
232
Added:
defined at [[help:org-id-locations-file][org-id-locations-file]] maintains a hash table for IDs and
233
Added:
writes this table to disk when exiting Emacs. Because of this, it
234
Added:
works best if you use a single Emacs process, not many.
235
Added:
236
Added:
Paraphrased from [[help:org-id-track-globally][the Emacs help interface]].
237
Added:
#+end_quote
238
Added:
239
Added:
#+BEGIN_SRC emacs-lisp :tangle yes
240
Added:
(setq org-id-locations-file
241
Added:
(concat sd-path-meta "org-id-locations"))
242
Added:
;; The leading period is removed because no files are hidden in the
243
Added:
;; metafiles' directory.
244
Added:
#+END_SRC
245
Added:
212
246
**** Location in previously visited file
213
247
214
248
#+BEGIN_SRC emacs-lisp :tangle yes
@@ -322,8 +356,8 @@
322
356
: (set-frame-parameter (selected-frame) 'alpha <both>)
323
357
324
358
#+BEGIN_SRC emacs-lisp :tangle yes
325
Removed:
(set-frame-parameter (selected-frame) 'alpha '(95 . 70))
326
Removed:
(add-to-list 'default-frame-alist '(alpha . (95 . 70)))
359
Added:
(set-frame-parameter (selected-frame) 'alpha '(90 . 70))
360
Added:
(add-to-list 'default-frame-alist '(alpha . (90 . 70)))
327
361
#+END_SRC
328
362
329
363
** Secrets
@@ -811,18 +845,16 @@
811
845
:bind (("C-f" . swiper)))
812
846
#+END_SRC
813
847
814
Removed:
*** Web browsing
848
Added:
*** COMMENT Web browsing
815
849
816
850
Thanks
817
851
Xah![fn::[[http://ergoemacs.org/emacs/emacs_set_default_browser.html]]]
818
852
853
Added:
We use a browser depending on the url.
819
854
#+BEGIN_SRC emacs-lisp :tangle yes
820
Removed:
;; use browser depending on url
821
Removed:
(setq
822
Removed:
browse-url-browser-function
823
Removed:
'(
824
Removed:
("wikipedia\\.org" . browse-url-firefox)
825
Removed:
("github" . browse-url-chromium)
855
Added:
(setq browse-url-browser-function
856
Added:
'(("wikipedia\\.org" . browse-url-firefox)
857
Added:
("github\\.com" . browse-url-chromium)
826
858
("thefreedictionary\\.com" . eww-browse-url)
827
859
("." . browse-url-default-browser)
828
860
))
@@ -1791,34 +1823,36 @@
1791
1823
Now, we describe the actual format of the header line.
1792
1824
1793
1825
#+BEGIN_SRC emacs-lisp :tangle yes
1794
Removed:
(setq-default
1795
Removed:
header-line-format
1796
Removed:
'(:eval
1797
Removed:
(list
1798
Removed:
(if (eq (length (window-list)) 1)
1799
Removed:
(propertize " ↤ "
1800
Removed:
'face 'org-meta-line
1801
Removed:
'mouse-face 'highlight
1802
Removed:
'keymap sd-header-line-previous-buffer-keymap
1803
Removed:
'help-echo "Return to previous window.")
1804
Removed:
(list (propertize " ❌ "
1805
Removed:
'face 'org-meta-line
1806
Removed:
'mouse-face 'org-todo
1807
Removed:
'keymap sd-header-line-kill-buffer-keymap
1808
Removed:
'help-echo "Close this window.")
1809
Removed:
(propertize " ⇱"
1810
Removed:
'face 'org-meta-line
1811
Removed:
'mouse-face 'highlight
1812
Removed:
'keymap sd-header-line-maximize-window-keymap
1813
Removed:
'help-echo "Maximize this window.")
1814
Removed:
(propertize "⇲ "
1815
Removed:
'face 'org-meta-line
1816
Removed:
'mouse-face 'highlight
1817
Removed:
'keymap sd-header-line-minimize-window-keymap
1818
Removed:
'help-echo "Minimize this window.")))
1819
Removed:
mode-line-buffer-identification)))
1826
Added:
(use-package all-the-icons)
1820
1827
1821
Removed:
(image-animate sd-icon-loading 0 t)
1828
Added:
(setq-default
1829
Added:
header-line-format
1830
Added:
'(:eval
1831
Added:
(list
1832
Added:
(if (eq (length (window-list)) 1)
1833
Added:
(propertize " ↤ "
1834
Added:
'face 'org-meta-line
1835
Added:
'mouse-face 'highlight
1836
Added:
'keymap sd-header-line-previous-buffer-keymap
1837
Added:
'help-echo "Return to previous window.")
1838
Added:
(list (propertize " ❌ "
1839
Added:
'face 'org-meta-line
1840
Added:
'mouse-face 'org-todo
1841
Added:
'keymap sd-header-line-kill-buffer-keymap
1842
Added:
'help-echo "Close this window.")
1843
Added:
(propertize " ⇱"
1844
Added:
'face 'org-meta-line
1845
Added:
'mouse-face 'highlight
1846
Added:
'keymap sd-header-line-maximize-window-keymap
1847
Added:
'help-echo "Maximize this window.")
1848
Added:
(propertize "⇲ "
1849
Added:
'face 'org-meta-line
1850
Added:
'mouse-face 'highlight
1851
Added:
'keymap sd-header-line-minimize-window-keymap
1852
Added:
'help-echo "Minimize this window.")))
1853
Added:
mode-line-buffer-identification)))
1854
Added:
1855
Added:
(image-animate sd-icon-loading 0 t)
1822
1856
#+END_SRC
1823
1857
1824
1858
**** Mode line
smart-documents.pdf
Binary files differ