From bcf9ee060342fa85b0367e25f2398a04118a1324 Mon Sep 17 00:00:00 2001 From: Blendoit Date: Sun, 8 Nov 2020 13:33:13 -0800 Subject: Org links and mode line. --- custom.el | 2 +- smart-documents.org | 128 +++++++++++++++++++++++------------------ smart-documents.pdf | Bin 257463 -> 256679 bytes snippets/emacs-lisp-mode/defun | 7 +++ themes/blendoit-light-theme.el | 22 +++---- 5 files changed, 90 insertions(+), 69 deletions(-) create mode 100644 snippets/emacs-lisp-mode/defun diff --git a/custom.el b/custom.el index 1b53fa9..ef9e394 100644 --- a/custom.el +++ b/custom.el @@ -15,7 +15,7 @@ '(company-quickhelp-color-foreground "#DCDCCC") '(custom-enabled-themes nil) '(custom-safe-themes - '("64e58ce36d361c8c0ba0fdaabd491f6d54828a1c4003bf5c7b85d1fa5e0a191f" "2c485aebc587aceca2cea4958381bdba92b9e974edb8ce8fbcde69399d9c45b0" "b0c4d8a7f261d7897373ec3b39fce87eaeeff278438ddbae5776fa9df4e550d1" "e85674d358ab59d5e14ba769bca4a58f267838a24f1285f53eab231d00671d1d" "2d32d272e79fd9b06855a26eedfbe8a1ff2c58a68219aa3fda6afb1c5094e6a4" "eb904e8bfc363aa8a342604329edd62f2b2effbb345941aa68448b50c26e3083" "57e8e75716473cb3234b52ef469c35ade301e4c928d53a21236b6c0a2bfda044" "2dd3f3f6397fb640c4ce13dfd9843a67ce32f329458f7d3e728d301bf7538c96" "a90216962b4117ecf26f1de9c87c995b2e0534a5a18565137f0bc0c38a454de4" "b60f26dbf84b1c93449cb65d6b61fbbc275d193739da66de1be1d0ba52996f1e" "d83c2da10ecbcc3d88f7f175741f5ba4ded9501bd87af69d3728cf8b02d98b17" "f272e2a066f881384f30cddc0be4067b36250fbfaf4a35a768327373e5b4a6f9" "bcfd4a063a9d86ad2a20c4ba8666738a332b1ffda8c6bb9c1ef951d27836dfa2" "a385bb05d1cbdfa62d01afbd7b67a6354c4f6d2ff5190ae4061d720bb5584524" "797fc9c1f596603b8559566dffcdd32b265b95f66db11c80cf819c9e764ccf1a" "95d9ebc003d2b41dce57c8a041d2fa5cc491ea239cbb8f14b04f77b86c971a50" "438eb17cf6540064f18b637e72d1d78f2df20dbbcc67ad67d2c6223eae23ff22" "778e41ae5e76bd91f457ce36244e6216a3f69b1cad236b0181eece15126f33cb" "e0577b022b2c27c558e1bb0cf1f56be92447b6d090865fd5e61be7f2245ac3b0" "ec6717222f527932ca0c00f54a77f6b1f0e9f81907bbb5bf338903608b1300a5" "2f35de225ab5e3ac7deea3f04b651ba579bdd6fa868502d0697938aa861909df" "98a8aeac4cd2648def2bb6fad797386c4bb05b2ee7cbe3a159b70fd68c51b2bf" "8404572e02baf9edb07cd902bf4ffb106e6996d2bc2f6a32e8058246f0d58850" "bfd4c07f80d3728cef2788018f4b045c17036b186e80055a01411ab4d69bb63e" "3edf9758c11e033496ff39fc699c4695d8a8e82f4d90af1be9b75de2d5106f02" "e5bdcd5a2822d56add3cb9928bd3a092ddb678c6588bf9dc3f34acd6bf24d781" "eacdea86fda91bba189912a6264450ecff73a95350a6e568324a673d9e8b0f16" "caaf410113356a930620a9e945994694c7834927669cb96083e7d94de8807f08" "3bfaf89f737e52e2500ed632428ce5d6e2dc399edef16d5dcd0c2c9606ed97d1" "187dedddb0f12642ef312de2a4ffadf6397747f0743bad6f6872f068129f0613" "b28fe360b938be2211f3525fa95f0ecfbb2759031ae66d2241207e86de83e951" "55e87047e7428fbd710f29f71a495a1bb3ea73f1b9b4c10def334838e3705c7b" "25e7750ab75809e94756b7039f83c65478a1ef895220dedda6b3f327df9fca65" "9760950e1c151f97b8ed0321c8577f216e1e6c09454c940e5d0f53255586c6f4" "0f350253da94e9a06abfdd48fe892f4e42da3b3d543bb1da62b5f415e29546cc" "6e69643e2c21e28b2e9d169fad1d4b149e191b836faf26541c3a7af8da920728" "3fa3799babafb468bbb17c6946bd5c831dbf32b3ac9b22d92f27188c1aee6057" "93b390eae98d60e363af65188220cc0b7fd8813ffca85915708a14661d3f79a7" "9397d802c0ce3108b13d2f23b579296ae63919f32a6436b8f2ec6d0d1b7853c1" "7999805b40f3dc59bda5822ae5f773e9ab6b9fe69931efc9265c083490c60dfc" "28aaafce20205c00c1c5afcd59d9553a621570f74d7ea4214d073a488bf4619c" "ee2934f60c0193ed7ac95a213ae90dba1504b9fc8bb20f54f4876d073f710844" "79ddf9c24ff10afdeeb2778f56c900f329e5b405d234d783cea67730f4a20c17" "dd6543577ed3e750b830635a7c2071343c8cd4b624f00b7e3470c9233fdc2252" "e5511d44e3a5c6a5039999cab6bd2696fddfe1e7f6500f2846b0c0a6b8c4f9e7" "8bc595fa3d4cde8770ec075aa939bff9ba28f3e70fe34292a43e22690bc63c76" "ab538dce25085abac8ab09b184e9cef8273082a1b2a792f1bf1bf08ecc30056a" "0326fd263f840b21da906e36c54976e211cfcc252800e6ee7dad4a7eb5a3e819" "77dfce3ef0bdf852a7a1b3527aa384c3c895eec7792a68c2d694b7341364da26" "1692d3b1f4bf5c6c55dd090d6a10c613c0b213510892ae305c1f2518cb1a3ab3" "7ddce903be67800840ef2660310123e2ee11c8ec716ac54333d961307389ccde" "95ea953c58a6510531acf2231d9bddad92015214dce68e8ffe216b51237a3a5f" "47ff07593ae6fc4069b49ee32b0f7422239ad3b6619dc37358b9e76c4b014e81" "8a7a94e776727c6ff6ac14ae88826281eea80c687ffee71a8b188e415b737525" "566f33a94ac1f29db041d55a22fb677b1f9abd02a3ea529ac2b67b93624247ac" "bac014130231bcb21409a5ba0368ae6a437d36cb3cd710a814c2b8399dacd0a3" "3db2664cf7a2f3ca8add66736e8b432ad7aed88159c74dc220ffdc0580d37ffa" "41d8c624783c3bf1624ac595936a6968fbd7297ffdc40a0c9b080fa750027df0" "abf6e5f8aa2af79ac329a7bfcac3111dab0025ce3eaea24e424fb9e3e77e1162" "6dd0e1980e88c5bc5c4c9ab1e8b16b13287a4fa5a2e11970c0d26dfbcf2d62f3" "e479b796a220addcd20678fbb95018e4945ca574ba9900b54d107ed1569c704c" "46d1602c1e28e6223fec2bcd008312bc57a08e5ccc8c2ac35c40e6a5d2a20244" "57c9cc95433eb236e74a3b501d3bebb2716e1988cf633c47384d33d8a83a7940" "1229a1fe390f71ddeec71efd61129af285d032364a1957f9954845a6c5f617a1" "42350b596ca9d6a283ce13efb9bbb7774064d917e04ea3220ebf32b95a677d60" "07b0edb4d75390504029f7905ca8add46af2c8bb13cec46efb0d880de014464c" "884b3999dfeff6d4f45859239a46b84399ab1b3602dd2ee6d11f3a3e39fe088d" "0c5c0078062fafd063a227b4cebb49b65434ea6e9557e3aaf8bc3212ba986512" "469032293efae7c0c86a95c39cab8b0ff8883cf4af3f2c292313cf6a71195b40" "8fb0949f4229860cf19034b924eb99c664327c9250fb92a2633bdf4b4abaf060" "c3a2a37e84e474c73c2b468553f9b5b73341419f72bbc1f4a4bcc1230ef86c85" "6495716176be0ced4142593b94a410135e0b373b686a869637824260d2f1ca11" "4467b1c8d7cc78fe98345c9c63eb62cf37844dc6868630add365494bde455715" "faeef63cb31f796b4bdf22f38e614934ab34d7deacaeb89b3e9cccf70aac5a85" "370fb305168fea1614535dc9ca30f496918eaca754b6c8969dd77fa872bec695" "e9f0c0c3397d07eb1c6c3551d67fd151e24bc6d72ec678841623ed572677c97a" "5c32236ef318adafe4102f627f330fa8f448046dfd838eef5cc09c7f682cf71f" "e343fecfb8d681186d594002c9b44ce48c2061599d7e4ec635cf1ca2a277a47a" "302dc61dc55600c7424f945dce9e74fba7df19f4a7bfb72aefd93193fa82ede4" "58f1f85248ba913387d1e7ed02a867161b315cfb5acff0c234e013ffd2577d22" "a256abf590bbc3257cc11d91a312e9fe8487dc1b95a5b7b732dd2f96a7fe5a45" "30368d6195cae9298304e6ac0534b90c85b1655965f1206c5c624270f0f46002" "311aa5df3223b5b4a7c638aad3befb4de9c7f46360d52acd1fa2cd2232b1dcbd" default)) + '("19b606dd808fff515e2b27a4617fc89bdbce5dc1783c6b1a2c23fca5b8459b68" "d2a094e39049c4456a7125fbd74ce03da7339c687f1b7d438d9c26ff3744f96e" "5d82c3714691512ced28284edef65f753b22036495960ac42e527a6d646c375b" "fc5b0c453ae5f9269923dc288ea2ea908246f3b1879dcf62eb43f37113e188e9" "be516cd0621f296f03d842450e8a2203ca3d6d8ad35df8c72d3541f7e7e363f4" "2a0da76cc52131ec545d7b737cea401aa90a96cae5d93f5eeeb33afd7a9db078" "64e58ce36d361c8c0ba0fdaabd491f6d54828a1c4003bf5c7b85d1fa5e0a191f" "2c485aebc587aceca2cea4958381bdba92b9e974edb8ce8fbcde69399d9c45b0" "b0c4d8a7f261d7897373ec3b39fce87eaeeff278438ddbae5776fa9df4e550d1" "e85674d358ab59d5e14ba769bca4a58f267838a24f1285f53eab231d00671d1d" "2d32d272e79fd9b06855a26eedfbe8a1ff2c58a68219aa3fda6afb1c5094e6a4" "eb904e8bfc363aa8a342604329edd62f2b2effbb345941aa68448b50c26e3083" "57e8e75716473cb3234b52ef469c35ade301e4c928d53a21236b6c0a2bfda044" "2dd3f3f6397fb640c4ce13dfd9843a67ce32f329458f7d3e728d301bf7538c96" "a90216962b4117ecf26f1de9c87c995b2e0534a5a18565137f0bc0c38a454de4" "b60f26dbf84b1c93449cb65d6b61fbbc275d193739da66de1be1d0ba52996f1e" "d83c2da10ecbcc3d88f7f175741f5ba4ded9501bd87af69d3728cf8b02d98b17" "f272e2a066f881384f30cddc0be4067b36250fbfaf4a35a768327373e5b4a6f9" "bcfd4a063a9d86ad2a20c4ba8666738a332b1ffda8c6bb9c1ef951d27836dfa2" "a385bb05d1cbdfa62d01afbd7b67a6354c4f6d2ff5190ae4061d720bb5584524" "797fc9c1f596603b8559566dffcdd32b265b95f66db11c80cf819c9e764ccf1a" "95d9ebc003d2b41dce57c8a041d2fa5cc491ea239cbb8f14b04f77b86c971a50" "438eb17cf6540064f18b637e72d1d78f2df20dbbcc67ad67d2c6223eae23ff22" "778e41ae5e76bd91f457ce36244e6216a3f69b1cad236b0181eece15126f33cb" "e0577b022b2c27c558e1bb0cf1f56be92447b6d090865fd5e61be7f2245ac3b0" "ec6717222f527932ca0c00f54a77f6b1f0e9f81907bbb5bf338903608b1300a5" "2f35de225ab5e3ac7deea3f04b651ba579bdd6fa868502d0697938aa861909df" "98a8aeac4cd2648def2bb6fad797386c4bb05b2ee7cbe3a159b70fd68c51b2bf" "8404572e02baf9edb07cd902bf4ffb106e6996d2bc2f6a32e8058246f0d58850" "bfd4c07f80d3728cef2788018f4b045c17036b186e80055a01411ab4d69bb63e" "3edf9758c11e033496ff39fc699c4695d8a8e82f4d90af1be9b75de2d5106f02" "e5bdcd5a2822d56add3cb9928bd3a092ddb678c6588bf9dc3f34acd6bf24d781" "eacdea86fda91bba189912a6264450ecff73a95350a6e568324a673d9e8b0f16" "caaf410113356a930620a9e945994694c7834927669cb96083e7d94de8807f08" "3bfaf89f737e52e2500ed632428ce5d6e2dc399edef16d5dcd0c2c9606ed97d1" "187dedddb0f12642ef312de2a4ffadf6397747f0743bad6f6872f068129f0613" "b28fe360b938be2211f3525fa95f0ecfbb2759031ae66d2241207e86de83e951" "55e87047e7428fbd710f29f71a495a1bb3ea73f1b9b4c10def334838e3705c7b" "25e7750ab75809e94756b7039f83c65478a1ef895220dedda6b3f327df9fca65" "9760950e1c151f97b8ed0321c8577f216e1e6c09454c940e5d0f53255586c6f4" "0f350253da94e9a06abfdd48fe892f4e42da3b3d543bb1da62b5f415e29546cc" "6e69643e2c21e28b2e9d169fad1d4b149e191b836faf26541c3a7af8da920728" "3fa3799babafb468bbb17c6946bd5c831dbf32b3ac9b22d92f27188c1aee6057" "93b390eae98d60e363af65188220cc0b7fd8813ffca85915708a14661d3f79a7" "9397d802c0ce3108b13d2f23b579296ae63919f32a6436b8f2ec6d0d1b7853c1" "7999805b40f3dc59bda5822ae5f773e9ab6b9fe69931efc9265c083490c60dfc" "28aaafce20205c00c1c5afcd59d9553a621570f74d7ea4214d073a488bf4619c" "ee2934f60c0193ed7ac95a213ae90dba1504b9fc8bb20f54f4876d073f710844" "79ddf9c24ff10afdeeb2778f56c900f329e5b405d234d783cea67730f4a20c17" "dd6543577ed3e750b830635a7c2071343c8cd4b624f00b7e3470c9233fdc2252" "e5511d44e3a5c6a5039999cab6bd2696fddfe1e7f6500f2846b0c0a6b8c4f9e7" "8bc595fa3d4cde8770ec075aa939bff9ba28f3e70fe34292a43e22690bc63c76" "ab538dce25085abac8ab09b184e9cef8273082a1b2a792f1bf1bf08ecc30056a" "0326fd263f840b21da906e36c54976e211cfcc252800e6ee7dad4a7eb5a3e819" "77dfce3ef0bdf852a7a1b3527aa384c3c895eec7792a68c2d694b7341364da26" "1692d3b1f4bf5c6c55dd090d6a10c613c0b213510892ae305c1f2518cb1a3ab3" "7ddce903be67800840ef2660310123e2ee11c8ec716ac54333d961307389ccde" "95ea953c58a6510531acf2231d9bddad92015214dce68e8ffe216b51237a3a5f" "47ff07593ae6fc4069b49ee32b0f7422239ad3b6619dc37358b9e76c4b014e81" "8a7a94e776727c6ff6ac14ae88826281eea80c687ffee71a8b188e415b737525" "566f33a94ac1f29db041d55a22fb677b1f9abd02a3ea529ac2b67b93624247ac" "bac014130231bcb21409a5ba0368ae6a437d36cb3cd710a814c2b8399dacd0a3" "3db2664cf7a2f3ca8add66736e8b432ad7aed88159c74dc220ffdc0580d37ffa" "41d8c624783c3bf1624ac595936a6968fbd7297ffdc40a0c9b080fa750027df0" "abf6e5f8aa2af79ac329a7bfcac3111dab0025ce3eaea24e424fb9e3e77e1162" "6dd0e1980e88c5bc5c4c9ab1e8b16b13287a4fa5a2e11970c0d26dfbcf2d62f3" "e479b796a220addcd20678fbb95018e4945ca574ba9900b54d107ed1569c704c" "46d1602c1e28e6223fec2bcd008312bc57a08e5ccc8c2ac35c40e6a5d2a20244" "57c9cc95433eb236e74a3b501d3bebb2716e1988cf633c47384d33d8a83a7940" "1229a1fe390f71ddeec71efd61129af285d032364a1957f9954845a6c5f617a1" "42350b596ca9d6a283ce13efb9bbb7774064d917e04ea3220ebf32b95a677d60" "07b0edb4d75390504029f7905ca8add46af2c8bb13cec46efb0d880de014464c" "884b3999dfeff6d4f45859239a46b84399ab1b3602dd2ee6d11f3a3e39fe088d" "0c5c0078062fafd063a227b4cebb49b65434ea6e9557e3aaf8bc3212ba986512" "469032293efae7c0c86a95c39cab8b0ff8883cf4af3f2c292313cf6a71195b40" "8fb0949f4229860cf19034b924eb99c664327c9250fb92a2633bdf4b4abaf060" "c3a2a37e84e474c73c2b468553f9b5b73341419f72bbc1f4a4bcc1230ef86c85" "6495716176be0ced4142593b94a410135e0b373b686a869637824260d2f1ca11" "4467b1c8d7cc78fe98345c9c63eb62cf37844dc6868630add365494bde455715" "faeef63cb31f796b4bdf22f38e614934ab34d7deacaeb89b3e9cccf70aac5a85" "370fb305168fea1614535dc9ca30f496918eaca754b6c8969dd77fa872bec695" "e9f0c0c3397d07eb1c6c3551d67fd151e24bc6d72ec678841623ed572677c97a" "5c32236ef318adafe4102f627f330fa8f448046dfd838eef5cc09c7f682cf71f" "e343fecfb8d681186d594002c9b44ce48c2061599d7e4ec635cf1ca2a277a47a" "302dc61dc55600c7424f945dce9e74fba7df19f4a7bfb72aefd93193fa82ede4" "58f1f85248ba913387d1e7ed02a867161b315cfb5acff0c234e013ffd2577d22" "a256abf590bbc3257cc11d91a312e9fe8487dc1b95a5b7b732dd2f96a7fe5a45" "30368d6195cae9298304e6ac0534b90c85b1655965f1206c5c624270f0f46002" "311aa5df3223b5b4a7c638aad3befb4de9c7f46360d52acd1fa2cd2232b1dcbd" default)) '(electric-indent-mode t) '(fci-rule-color "#383838") '(fringe-mode 0 nil (fringe)) diff --git a/smart-documents.org b/smart-documents.org index 972cc5d..baced32 100644 --- a/smart-documents.org +++ b/smart-documents.org @@ -923,6 +923,8 @@ header: ** Basic customization +*** Base folder + Org base directory is in user home on GNU/Linux, or in =AppData= in MS Windows. #+NAME: org-directory @@ -930,7 +932,13 @@ Org base directory is in user home on GNU/Linux, or in =AppData= in MS Windows. (setq org-directory (concat user-emacs-directory "~/org")) #+END_SRC -** TODO Org cosmetics +*** Prevent/warn on invisible edits + +#+BEGIN_SRC emacs-lisp :tangle yes +(setq org-catch-invisible-edits t) +#+END_SRC + +** Org cosmetics First, we ensure the display of markup symbols for *bold*, /italic/, _underlined_ and +strikethrough+ text, and ensure our document appears indented @@ -1001,30 +1009,36 @@ properties]]). '(emacs-lisp-checkdoc)))) #+END_SRC -** Languages executable in Smart Documents +*** Timestamps -The following languages can be written inside =SRC= blocks, in view of being -executed by the Org Babel backend. +More literary timestamps are exported to LaTeX using the following custom +format: #+BEGIN_SRC emacs-lisp :tangle yes - (setq org-babel-load-languages - '((shell . t) - (python . t) - (plantuml . t) - (emacs-lisp . t) - (awk . t) - (ledger . t) - (gnuplot . t) - (latex . t))) - - (org-babel-do-load-languages - 'org-babel-load-languages '((C . t) (shell . t) (gnuplot . t))) + (setq org-time-stamp-custom-formats + '("%d %b. %Y (%a)" . "%d %b. %Y (%a), at %H:%M")) #+END_SRC -** Prevent or warn on invisible edits +** Programming a Smart Documents + +The following languages can be used inside =SRC= blocks, in view of being +executed by the Org Babel backend upon document export. #+BEGIN_SRC emacs-lisp :tangle yes -(setq org-catch-invisible-edits t) + (setq org-babel-load-languages + '((shell . t) + (python . t) + (plantuml . t) + (emacs-lisp . t) + (awk . t) + (ledger . t) + (gnuplot . t) + (latex . t))) + + (org-babel-do-load-languages + 'org-babel-load-languages '((C . t) + (shell . t) + (gnuplot . t))) #+END_SRC ** Agenda @@ -1039,16 +1053,6 @@ We open the agenda in a separate window. (setq org-agenda-window-setup 'other-frame) #+END_SRC -** Timestamps - -More literary timestamps are exported to LaTeX using the following custom -format: - -#+BEGIN_SRC emacs-lisp :tangle yes - (setq org-time-stamp-custom-formats - '("%d %b. %Y (%a)" . "%d %b. %Y (%a), at %H:%M")) -#+END_SRC - ** LaTeX export We'll be compiling our documents with LuaTeX. This will afford us some @@ -1167,6 +1171,27 @@ however cleaner to separate table of contents with the rest of the work. The following makes =TODO= items appear red and =CLOSED= items appear green in Org's LaTeX exports. Very stylish, much flair! +** Org links + +This is a mind-bending capacity of Org mode: we can assign arbitrary functions +to be executed when a user follows an Org link. Org links appear like +hyperlinks both in buffers and PDF exports---e.g. the following link to this +very section, Section [[Org links]]---but their in-buffer behavior can be +arbitrarily assigned. + +#+BEGIN_SRC emacs-lisp :tangle no + (org-add-link-type + "tag" 'endless/follow-tag-link) + + (defun endless/follow-tag-link (tag) + "Display a list of TODO headlines with tag TAG. + With prefix argument, also display headlines without a TODO keyword." + (org-tags-view (null current-prefix-arg) tag)) + + [[tag:work+phonenumber-boss][Optional Description]] +#+END_SRC + + * One-click workflows In this section, we'll implement useful one-click workflows. It comes later @@ -1243,51 +1268,40 @@ The keybinding for opening a recently visited file is described in paragraph ** Frame -*** TODO Header & mode lines +*** Header & mode lines # Top of the buffer is more intuitive for buffer info, bottom is more intuitive # for buffer action. -First, we create a function to calculate available width between left and right -portions of the header and mode line. - -#+NAME: sd-line-render -#+BEGIN_SRC emacs-lisp :tangle yes - (defun sd-line-render (left right) - "Return a string of `window-width' length - containing LEFT, and RIGHT aligned respectively." - (let ((available-width (- (window-total-width) - (+ (length (format-mode-line left)) - (length (format-mode-line right)))))) - (format (format " %%s %%%ds " available-width) left right))) -#+END_SRC - **** TODO Header line In Org mode, the document header line will be the title of the document we are working on currently. -todo unfontify org-document-title. - #+BEGIN_SRC emacs-lisp :tangle yes (add-hook 'org-mode-hook (lambda () "Set the header line to show #+TITLE and section name." (setq header-line-format - '(:eval (org-property-value "TITLE"))))) + '(:eval + (list + " " + (org-property-value "TITLE")))))) #+END_SRC **** Mode line -Then, we use the previously declared function to set up our mode line. - #+NAME: mode-line-format #+BEGIN_SRC emacs-lisp :tangle yes -(setq-default mode-line-format - '((:eval (sd-line-render - ;; left - (format-mode-line "[%*] %b") - ;; right - (format-mode-line "Line: %l "))))) + (setq-default mode-line-format + (list + '(:eval + (list + " " + (if buffer-read-only "🔒" "🔓") + (propertize " %b " + 'help-echo (buffer-file-name) + ) + (if (buffer-modified-p) "🖉" "✓"))))) #+END_SRC ** Window @@ -1388,9 +1402,9 @@ Without a carefully designed theme, our editor would become unusable. Thus, we describe two themes that were developed purposefully and iteratively. #+BEGIN_SRC emacs-lisp :tangle yes -(setq custom-theme-directory (concat user-emacs-directory "themes/")) -(load-theme 'blendoit-light) -; (load-theme 'blendoit-dark) + (setq custom-theme-directory (concat user-emacs-directory "themes/")) + (load-theme 'blendoit-light) + ;; (load-theme 'blendoit-dark) #+END_SRC ** My light and dark themes diff --git a/smart-documents.pdf b/smart-documents.pdf index ddb3a56..371d913 100644 Binary files a/smart-documents.pdf and b/smart-documents.pdf differ diff --git a/snippets/emacs-lisp-mode/defun b/snippets/emacs-lisp-mode/defun new file mode 100644 index 0000000..80373b2 --- /dev/null +++ b/snippets/emacs-lisp-mode/defun @@ -0,0 +1,7 @@ +# -*- mode: snippet -*- +# name: defun +# key: def +# -- +(defun ${1:function-name} (${2:arguments}) + "${3:Docstring}" + $0) \ No newline at end of file diff --git a/themes/blendoit-light-theme.el b/themes/blendoit-light-theme.el index 6a0b1b7..1be39e3 100644 --- a/themes/blendoit-light-theme.el +++ b/themes/blendoit-light-theme.el @@ -1,5 +1,5 @@ (deftheme blendoit-light - "Created 2020-11-07.") + "Created 2020-11-08.") (custom-theme-set-faces 'blendoit-light @@ -29,13 +29,13 @@ '(font-lock-variable-name-face ((t (:foreground "sienna")))) '(font-lock-warning-face ((t (:inherit (error))))) '(fringe ((t (:background "grey95")))) - '(header-line ((t (:weight extra-bold :height 2.0 :family "Jost*")))) + '(header-line ((t (:weight extra-bold :height 1.8 :family "Jost*")))) '(tooltip ((t (:inherit variable-pitch :background "lightyellow" :foreground "black")))) - '(mode-line ((t (:family "Hermit" :background "steel blue" :foreground "white" :box (:line-width -1 :style released-button))))) + '(mode-line ((t (:box (:line-width -1 :style released-button) :foreground "white" :background "steel blue" :family "Hermit" :height 1.2)))) '(mode-line-buffer-id ((t (:weight bold)))) '(mode-line-emphasis ((t (:weight bold)))) '(mode-line-highlight ((t (:box (:line-width 2 :color "grey40" :style released-button))))) - '(mode-line-inactive ((t (:family "Hermit" :background "SteelBlue4" :foreground "gainsboro" :box (:line-width -1 :color "gainsboro"))))) + '(mode-line-inactive ((t (:box (:line-width -1 :color "gainsboro") :foreground "gainsboro" :background "SteelBlue4" :family "Hermit" :height 1.2)))) '(isearch ((t (:background "DodgerBlue1" :foreground "white")))) '(isearch-fail ((t (:background "RosyBrown1")))) '(lazy-highlight ((t (:foreground "DodgerBlue1" :box 2)))) @@ -51,7 +51,7 @@ '(ivy-minibuffer-match-face-3 ((t (:inherit swiper-match-face-3)))) '(ivy-minibuffer-match-face-4 ((t (:inherit swiper-match-face-4)))) '(ivy-minibuffer-match-highlight ((t (:inherit highlight)))) - '(org-document-title ((t (:weight bold :height 2.0 :family "Jost*")))) + '(org-document-title ((t (:weight bold :height 2.4 :family "Jost*")))) '(org-formula ((t (:inherit org-table)))) '(org-meta-line ((t (:foreground "SteelBlue" :family "Hermit")))) '(org-document-info-keyword ((t (:inherit org-meta-line)))) @@ -61,12 +61,12 @@ '(org-document-info ((t (:weight bold)))) '(org-table ((t (:height 0.8 :family "Hack")))) '(org-block ((t (:foreground "light slate blue" :background "smoke" :inherit fixed-pitch)))) - '(org-special-keyword ((t (:background "white" :weight bold :inherit org-meta-line)))) - '(org-level-1 ((t (:weight bold :height 1.6 :family "Jost*")))) - '(org-level-2 ((t (:weight bold :height 1.4)))) - '(org-level-3 ((t (:weight bold :height 1.2)))) - '(org-level-4 ((t (:weight bold :height 1.1)))) - '(org-level-5 ((t (:weight bold :height 1.0)))) + '(org-special-keyword ((t (:inherit org-meta-line :weight bold :background "white")))) + '(org-level-1 ((t (:weight bold :height 1.8 :family "Jost*")))) + '(org-level-2 ((t (:weight bold :height 1.6)))) + '(org-level-3 ((t (:weight bold :height 1.4)))) + '(org-level-4 ((t (:weight bold :height 1.2)))) + '(org-level-5 ((t (:weight bold :height 1.1)))) '(org-level-6 ((t (:inherit org-level-5)))) '(org-level-7 ((t (:inherit org-level-5)))) '(org-level-8 ((t (:inherit org-level-5)))) -- cgit v1.2.3