summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--smart-documents.org66
1 files changed, 0 insertions, 66 deletions
diff --git a/smart-documents.org b/smart-documents.org
index cd593e7..e7a38d4 100644
--- a/smart-documents.org
+++ b/smart-documents.org
@@ -1785,69 +1785,3 @@ the result of our profiling.
In this configuration file, we described a series of customization
steps taken to make Emacs more palatable to modern word processors
users.
-
-We will now go through the appendices in the following order:
-
-1. Ideas implemented, then retired;
-2. Risky ideas that might displease Emacs when it reads our literate
- configuration. If these risky ideas are included in the main body
- of the paper, it becomes difficult to identify which one is causing
- trouble.
-
-#+LATEX: \appendix
-* Old introduction
-
-GNU Emacs is most often used as a text editor. The utmost level of
-customization is afforded by the ability to rewrite /any/ part of the
-source code and observe the editor's modified behavior in real
-time. Since its inception in 1984, GNU Emacs has grown to be much more
-than a full-featured, high-productivity text editor---new /modes/ have
-been written to interact with hundreds of file formats, including
-=.txt=, =.pdf=, =.jpg=, =.csv=, and =.zip= just to name a few. This
-paper itself was written in /Org mode/, a collection of functions
-enabling the harmonious mixing of code, comments and content in view
-of publication: this is the endgame of /literate programming/, and the
-basis of my vision for /Smart Documents/.
-
-* Unpacking our literate configuration
-:PROPERTIES:
-:sd-unpack-path: sd.el
-:END:
-
-The following code blocks are normally evaluated once---upon starting
-Emacs for the first time.
-
-#+BEGIN_SRC emacs-lisp :tangle no
- (defvar sd-packed-p t
- "Boolean to track literate configuration packed/unpacked status.")
-
- (defvar sd-unpack-sections (org-property-values "sd-unpack-path")
- "List of target sections in `my/literate-config' to be unpacked.")
-
- (defun sd-unpack-sections ()
- "Unpack literate configuration into `emacs-user-directory'."
- (interactive)
- (mapcar 'sd-unpack sd-unpack-sections)
- )
-
- (defun sd-unpack-section (&optional section)
- "Unpack SECTION into `user-emacs-directory'.
- If nil, unpack section under point.
- Make go through list of headings and unpack first matching SECTION."
- (interactive)
- (if (not section)
- (insert
- (concat
- "\nThe contents of this Section was automatically moved to\n="
- user-emacs-directory (org-entry-get nil "sd-unpack-path") "=.\n"
- "Use `sd-pack-section' to copy the contents back into this section."))))
-
- (defun sd-pack-section ()
- "Pack SECTION into `my/literate-config'."
- (interactive)
- (message "foobar!!!"))
-
- (global-set-key (kbd "C-t") 'sd-pack-section)
-
- (sd-unpack "init.el")
-#+END_SRC
Copyright 2019--2024 Marius PETER