[Emacs Lisp] Personal ~/.emacs.d/ configuration folder.
Appendix for aborted ideas.
smart-documents.org
@@ -56,52 +56,6 @@
56
56
57
57
You can always press ~f1~ to access Emacs built-in help.
58
58
59
Removed:
* First-time setup
60
Removed:
61
Removed:
The following code blocks are normally evaluated once---upon starting
62
Removed:
Emacs for the first time.
63
Removed:
64
Removed:
** TODO Unpacking our literate configuration
65
Removed:
:PROPERTIES:
66
Removed:
:sd-unpack-path: sd.el
67
Removed:
:END:
68
Removed:
69
Removed:
#+BEGIN_SRC emacs-lisp :tangle no
70
Removed:
(defvar sd-packed-p t
71
Removed:
"Boolean to track literate configuration packed/unpacked status.")
72
Removed:
73
Removed:
(defvar sd-unpack-sections (org-property-values "sd-unpack-path")
74
Removed:
"List of target sections in `my/literate-config' to be unpacked.")
75
Removed:
76
Removed:
(defun sd-unpack-sections ()
77
Removed:
"Unpack literate configuration into `emacs-user-directory'."
78
Removed:
(interactive)
79
Removed:
(mapcar 'sd-unpack sd-unpack-sections)
80
Removed:
)
81
Removed:
82
Removed:
(defun sd-unpack-section (&optional section)
83
Removed:
"Unpack SECTION into `user-emacs-directory'.
84
Removed:
If nil, unpack section under point.
85
Removed:
Make go through list of headings and unpack first matching SECTION."
86
Removed:
(interactive)
87
Removed:
(if (not section)
88
Removed:
(insert
89
Removed:
(concat
90
Removed:
"\nThe contents of this Section was automatically moved to\n="
91
Removed:
user-emacs-directory (org-entry-get nil "sd-unpack-path") "=.\n"
92
Removed:
"Use `sd-pack-section' to copy the contents back into this section."))))
93
Removed:
94
Removed:
95
Removed:
(defun sd-pack-section ()
96
Removed:
"Pack SECTION into `my/literate-config'."
97
Removed:
(interactive)
98
Removed:
(message "foobar!!!"))
99
Removed:
100
Removed:
(global-set-key (kbd "C-t") 'sd-pack-section)
101
Removed:
102
Removed:
(sd-unpack "init.el")
103
Removed:
#+END_SRC
104
Removed:
105
59
** TODO User details
106
60
107
61
One advantage of working with /Smart Documents/ is that they can
@@ -1839,4 +1793,57 @@
1839
1793
* Conclusion
1840
1794
1841
1795
In this configuration file, we described a series of customization
1842
Removed:
steps taken to make Emacs more palatable to modern IDE users.
1796
Added:
steps taken to make Emacs more palatable to modern word processors
1797
Added:
users.
1798
Added:
1799
Added:
We will now go through the appendices in the following order:
1800
Added:
1801
Added:
1. Ideas implemented, then retired;
1802
Added:
2. Risky ideas that might displease Emacs when it reads our literate
1803
Added:
configuration. If these risky ideas are included in the main body
1804
Added:
of the paper, it becomes difficult to identify which one is causing
1805
Added:
trouble.
1806
Added:
1807
Added:
\appendix
1808
Added:
* Unpacking our literate configuration
1809
Added:
:PROPERTIES:
1810
Added:
:sd-unpack-path: sd.el
1811
Added:
:END:
1812
Added:
1813
Added:
The following code blocks are normally evaluated once---upon starting
1814
Added:
Emacs for the first time.
1815
Added:
1816
Added:
#+BEGIN_SRC emacs-lisp :tangle no
1817
Added:
(defvar sd-packed-p t
1818
Added:
"Boolean to track literate configuration packed/unpacked status.")
1819
Added:
1820
Added:
(defvar sd-unpack-sections (org-property-values "sd-unpack-path")
1821
Added:
"List of target sections in `my/literate-config' to be unpacked.")
1822
Added:
1823
Added:
(defun sd-unpack-sections ()
1824
Added:
"Unpack literate configuration into `emacs-user-directory'."
1825
Added:
(interactive)
1826
Added:
(mapcar 'sd-unpack sd-unpack-sections)
1827
Added:
)
1828
Added:
1829
Added:
(defun sd-unpack-section (&optional section)
1830
Added:
"Unpack SECTION into `user-emacs-directory'.
1831
Added:
If nil, unpack section under point.
1832
Added:
Make go through list of headings and unpack first matching SECTION."
1833
Added:
(interactive)
1834
Added:
(if (not section)
1835
Added:
(insert
1836
Added:
(concat
1837
Added:
"\nThe contents of this Section was automatically moved to\n="
1838
Added:
user-emacs-directory (org-entry-get nil "sd-unpack-path") "=.\n"
1839
Added:
"Use `sd-pack-section' to copy the contents back into this section."))))
1840
Added:
1841
Added:
(defun sd-pack-section ()
1842
Added:
"Pack SECTION into `my/literate-config'."
1843
Added:
(interactive)
1844
Added:
(message "foobar!!!"))
1845
Added:
1846
Added:
(global-set-key (kbd "C-t") 'sd-pack-section)
1847
Added:
1848
Added:
(sd-unpack "init.el")
1849
Added:
#+END_SRC