`sd' packing & unpacking.

Commit
95e6d6c069f2cb251f656fc32a96eb1a9a076690
Author
Blendoit <blendoit@gmail.com>
Author date
Committer
Blendoit <blendoit@gmail.com>
Committer date
Changed files
custom.el
index 6b1340da..d5e7fa39 100644..100644
@@ -15,7 +15,7 @@
15 15 '(company-quickhelp-color-foreground "#DCDCCC")
16 16 '(custom-enabled-themes nil)
17 17 '(custom-safe-themes
18 Removed: '("0c5c0078062fafd063a227b4cebb49b65434ea6e9557e3aaf8bc3212ba986512" "469032293efae7c0c86a95c39cab8b0ff8883cf4af3f2c292313cf6a71195b40" "8fb0949f4229860cf19034b924eb99c664327c9250fb92a2633bdf4b4abaf060" "c3a2a37e84e474c73c2b468553f9b5b73341419f72bbc1f4a4bcc1230ef86c85" "6495716176be0ced4142593b94a410135e0b373b686a869637824260d2f1ca11" "4467b1c8d7cc78fe98345c9c63eb62cf37844dc6868630add365494bde455715" "faeef63cb31f796b4bdf22f38e614934ab34d7deacaeb89b3e9cccf70aac5a85" "370fb305168fea1614535dc9ca30f496918eaca754b6c8969dd77fa872bec695" "e9f0c0c3397d07eb1c6c3551d67fd151e24bc6d72ec678841623ed572677c97a" "5c32236ef318adafe4102f627f330fa8f448046dfd838eef5cc09c7f682cf71f" "e343fecfb8d681186d594002c9b44ce48c2061599d7e4ec635cf1ca2a277a47a" "302dc61dc55600c7424f945dce9e74fba7df19f4a7bfb72aefd93193fa82ede4" "58f1f85248ba913387d1e7ed02a867161b315cfb5acff0c234e013ffd2577d22" "a256abf590bbc3257cc11d91a312e9fe8487dc1b95a5b7b732dd2f96a7fe5a45" "30368d6195cae9298304e6ac0534b90c85b1655965f1206c5c624270f0f46002" "311aa5df3223b5b4a7c638aad3befb4de9c7f46360d52acd1fa2cd2232b1dcbd" default))
18 Added: '("46d1602c1e28e6223fec2bcd008312bc57a08e5ccc8c2ac35c40e6a5d2a20244" "57c9cc95433eb236e74a3b501d3bebb2716e1988cf633c47384d33d8a83a7940" "1229a1fe390f71ddeec71efd61129af285d032364a1957f9954845a6c5f617a1" "42350b596ca9d6a283ce13efb9bbb7774064d917e04ea3220ebf32b95a677d60" "07b0edb4d75390504029f7905ca8add46af2c8bb13cec46efb0d880de014464c" "884b3999dfeff6d4f45859239a46b84399ab1b3602dd2ee6d11f3a3e39fe088d" "0c5c0078062fafd063a227b4cebb49b65434ea6e9557e3aaf8bc3212ba986512" "469032293efae7c0c86a95c39cab8b0ff8883cf4af3f2c292313cf6a71195b40" "8fb0949f4229860cf19034b924eb99c664327c9250fb92a2633bdf4b4abaf060" "c3a2a37e84e474c73c2b468553f9b5b73341419f72bbc1f4a4bcc1230ef86c85" "6495716176be0ced4142593b94a410135e0b373b686a869637824260d2f1ca11" "4467b1c8d7cc78fe98345c9c63eb62cf37844dc6868630add365494bde455715" "faeef63cb31f796b4bdf22f38e614934ab34d7deacaeb89b3e9cccf70aac5a85" "370fb305168fea1614535dc9ca30f496918eaca754b6c8969dd77fa872bec695" "e9f0c0c3397d07eb1c6c3551d67fd151e24bc6d72ec678841623ed572677c97a" "5c32236ef318adafe4102f627f330fa8f448046dfd838eef5cc09c7f682cf71f" "e343fecfb8d681186d594002c9b44ce48c2061599d7e4ec635cf1ca2a277a47a" "302dc61dc55600c7424f945dce9e74fba7df19f4a7bfb72aefd93193fa82ede4" "58f1f85248ba913387d1e7ed02a867161b315cfb5acff0c234e013ffd2577d22" "a256abf590bbc3257cc11d91a312e9fe8487dc1b95a5b7b732dd2f96a7fe5a45" "30368d6195cae9298304e6ac0534b90c85b1655965f1206c5c624270f0f46002" "311aa5df3223b5b4a7c638aad3befb4de9c7f46360d52acd1fa2cd2232b1dcbd" default))
19 19 '(fci-rule-color "#383838")
20 20 '(fringe-mode 0 nil (fringe))
21 21 '(indicate-empty-lines t)
@@ -30,7 +30,7 @@
30 30 '(org-log-done 'time)
31 31 '(org-startup-align-all-tables t)
32 32 '(package-selected-packages
33 Removed: '(dashboard undo-tree hungry-delete smooth-scroll smooth-scrolling delight yasnippet-snippets yasnippet org-sticky-header awesome-tab tabbar-ruler tabbar-mode linum-relative dumb-jump csv-mode rainbow-mode org-mouse projectile minimap gnuplot ledger-mode company-mode wombat-theme wombar-theme which-key srefactor-lisp srefactor all-the-icons flycheck ibuffer-sidebar pdf-tools magit rainbow-delimiters smartparens mixed-pitch org-bullets use-package tabbar powerline ivy-hydra flatui-theme evil counsel company benchmark-init))
33 Added: '(mode-icons dashboard undo-tree hungry-delete smooth-scroll smooth-scrolling delight yasnippet-snippets yasnippet org-sticky-header awesome-tab tabbar-ruler tabbar-mode linum-relative dumb-jump csv-mode rainbow-mode org-mouse projectile minimap gnuplot ledger-mode company-mode wombat-theme wombar-theme which-key srefactor-lisp srefactor all-the-icons flycheck ibuffer-sidebar pdf-tools magit rainbow-delimiters smartparens mixed-pitch org-bullets use-package tabbar powerline ivy-hydra flatui-theme evil counsel company benchmark-init))
34 34 '(pdf-view-midnight-colors '("#DCDCCC" . "#383838"))
35 35 '(save-place-mode t)
36 36 '(send-mail-function 'smtpmail-send-it)
smart-documents.org
index 3765038e..109c9b20 100644..100644
@@ -1,4 +1,4 @@
1 Removed: # -*- mode: org; -*- #
1 Added: # -*- mode: org; -*-
2 2
3 3 #+TITLE: Smart Documents
4 4 #+AUTHOR: Marius Peter
@@ -64,6 +64,45 @@
64 64 The following code blocks are normally evaluated once---upon starting Emacs for
65 65 the first time.
66 66
67 Added: ** TODO Unpacking our literate configuration
68 Added: :PROPERTIES:
69 Added: :sd-unpack-path: sd.el
70 Added: :END:
71 Added:
72 Added: #+BEGIN_SRC emacs-lisp :tangle no
73 Added: (defvar sd-packed-p t
74 Added: "Boolean to track literate configuration packed/unpacked status.")
75 Added:
76 Added: (defvar sd-unpack-sections (org-property-values "sd-unpack-path")
77 Added: "List of target sections in `my/literate-config' to be unpacked into `user-emacs-directory'.")
78 Added:
79 Added: (defun sd-unpack-sections ()
80 Added: "Unpack literate configuration into `emacs-user-directory'."
81 Added: (interactive)
82 Added: (mapcar 'sd-unpack sd-unpack-sections)
83 Added: )
84 Added:
85 Added: (defun sd-unpack-section (section)
86 Added: "Unpack SECTION into `user-emacs-directory'.
87 Added: If nil, unpack section under point.
88 Added: Make go through list of headings and unpack first matching SECTION."
89 Added: (interactive)
90 Added: (if (not section)
91 Added: (insert (concat "\nThe contents of this Section was automatically moved to\n="
92 Added: user-emacs-directory (org-entry-get nil "sd-unpack-path") "=.\n"
93 Added: "Use `sd-pack-section' to copy the contents back into this section."))))
94 Added:
95 Added:
96 Added: (defun sd-pack-section ()
97 Added: "Pack SECTION into `my/literate-config'."
98 Added: (interactive)
99 Added: (message "foobar!!!"))
100 Added:
101 Added: (global-set-key (kbd "C-t") 'sd-pack-section)
102 Added:
103 Added: (sd-unpack "init.el")
104 Added: #+END_SRC
105 Added:
67 106 ** TODO User details
68 107
69 108 One advantage of working with /Smart Documents/ is that they can automatically
@@ -108,7 +147,14 @@
108 147 * Early setup
109 148
110 149 ** The first file to load
150 Added: :PROPERTIES:
151 Added: :sd-unpack-path: init.el
152 Added: :END:
111 153
154 Added: The contents of this Section was automatically moved to
155 Added: =~/.emacs.d/init.el=.
156 Added: Use `sd-pack-section' to copy the contents back into this section.
157 Added:
112 158 This is the very first user-editable file loaded by Emacs.[fn::This feature
113 159 became available in version 27.1.] In it, we disable GUI elements that would
114 160 otherwise be loaded and displayed once Emacs is ready to accept user input.
@@ -116,6 +162,9 @@
116 162 It can be found here: [[file:early-init.el]]
117 163
118 164 ** The second file to load
165 Added: :PROPERTIES:
166 Added: :sd-unpack-path: early-init.el
167 Added: :END:
119 168
120 169 #+BEGIN_QUOTE
121 170 Traditionally, file =~/.emacs= is used as the init file, although Emacs also